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Editorial 


EL PRIMER ANO 


Con este son ya dace numeros en la cal(e; mejor 
dicho: trece. El especial de verano fue anadido como 
consecuencia de vuestra inestimable aceptaciom 
Igualmcnte tovimos en cuenta el exito del cuademi- 
llo de programas que inclufamos en el ejemplar del 
pasado dictembre. De a hi sal id un numero diferente 
que potencia la fid continuidad dc la cita me usual. 

El balance de estos doce meses nos hace darnos 
cuenta dc vuestro alto in dice de participation en las 
actividades a las que os hem os convocado, desde con^ 
curses, votaciones..., sin olvidamos de la abrumado- 
ra respuesta a la encuesta. 

Memos pubticado unas cuantas colaboraciones de 
lectores cuvo excelente nivel las hizo pasar desaper- 
cibidas (para bien) entre los articulos desarrollados 
por autores con experiencia. Sin embargo, la canti- 
dad de cintas recibidas con programas vuestros, no 
siendo pocas, distan algo de nuestras cxpectativas. 
Os animamos a enviarlos, un buen programa no pue- 
de dormitar en un cajon. 


Por otro lado, durante tan corto penodo, hay que 
ver como ha evolucionado este mundo nuestro, con 
la a pari cion de nuevas m areas y model os de ordena- 
dor mas competitivos y. sobre todo, lo que es casi in- 
crefble ha si do la evolution dc los precios a la baja. 

Tarn bien es tier to que sc ban malogrado algunos 
otros sistemas, cn los que sc habian pucsto grandes 
esperanzas por su aparente competitividad v todos 
conocemos cuales son, 


Este numero vuelve a seguir la linea de los once 
ameriores, que se caracteriza por su intention didac- 
tica frente a la opeion de publicar fundamental men- 
te listados para copiar. sin rchuir suministrar algunos 
de vez en cuando. 


Desde este editorial os volvemos a in star para que 
continue is enviando vuestras colaboraciones v pro¬ 
gramas, Estamos seguros dc que ha be is pre parade 
trabajos sensacionalcs durante el estfo. 


LOS MEJORES DE INPUT 


Memos pens ado que es intoresante disponer de un ranking que 
poraa en ciaro, mes a mes cuales son ios programas preferidos 
de nuestros lectores Para elk), es obligado preauntaros directamen- 
te v tener as* ei meior termometro para conocer vuestras preferen¬ 
ces Podeis votar por cualquier programa aunque no haya sido co¬ 
me ntaoo todavia en INPUT 


Ei resultado de las votaciones sera publicado en cada numero 

de INPUT 

Entre los votantes sortearemos 10 cintas ae los titulos que pidais 
en vuestros cupones. 

Nota: No es pteciso que corteis la revista una copra tiectia a 
maqutna o una simple fotocopia sirven 


Enviad vuestros votos a: LOS MEJORES DE INPUT Alberto Alcocer. 46 - 4. B. 28016 Madrid 


EDGE TUS PROGRAMAS 

l Primer titulo elegido I_ , ... i i i i , i _L Segundo titulo elegido i i i l i i i_ ..i_i_i_:_i_i_! 

Tercer titulo elegido 1 i i i t i i i i i i j i i . ] . i Programa que te gustaria oonseguir i i , , . .. 

' Que ordenadcr tienes l i i i i ■ i i i ; . _ i , I Nombre 

1.*Apellido 1 i i i i i _i i i i i _j _i_i_i_i_I 2.°Apellido 


Fectia de nacimiento |_ l 


I I L 


J L 


i_r_i_L Teiefono I 

| Direction I , i i i i i i i t _i_i_i_i_i_ i . i _i_I Loc alidad I 

Provincia L_ l J__! 1_L i l i i i _L I 


L. 


1 1 1 

I 

| 

i l 1 

t 

. . 1 - 

1 

1 

1 

J L 

i 

1 
















J j 

, * 

i i i 

t 

1 

i i i 

1, 

1 

1 

1 

1 

1 L 

t 

1 

1 

l i 

i i i 

1 

t 

l l 1 

1 

1 

1 

1 

1 

1 1 

i 

t 

1 

l 

■ 

1 | 

1 J L 

X 

p 

1 

-L J L 

L 

L 

l 


^ L_ 

J L 

L 

U 

i 

* 

! | 


INPUT SINCLAIR N, 3 12 i 


I 
























































yXctualidad 


LA NUEVA VERSION 
DEL SPECTRUM 


■_a esperada reaodelacidn del 

Spectrin parece que sera bautizada 
coeo Saectrua Plus Two . Todo el 
•undo supone que su puesta de largo 
para prindpias del presente «es de 
septieibre, coincidiendo con el PCM 
Show que se celebra en Londres. 

Se especula en torno al tips de 
teclado que incorporard el nuevo 
modelo, casi tcdos sospechaPan que 
seria el ®is*o que utiiizan las 
ncdelos de fiastrad. Sin enbargo 
parece que se aantendri el teclado 
del Pius , porque el caabio In tapide 
la razbn de Ids castes. 

Es *uy posible que el nuevo diseno 
incorpore el ansiado port destinado 
al joystick, que tanto se ha echado 
de nenos en las nodelos actuales. 

En cuanto al diseno interior del 
Plus Two , ahora pasa a disponer de 
cuatro ULfts de apiicacibn 
especializada, desarrolladas a la 
aedida del sisteaa. 

Por filtiao, el grabador/reproductcr 
de cassette se espera que sea el 
aisio que util nan los otros nodelos 
de fiastrad . 

El precio anunciado al que podrla 
ser 1anzado en las lslas britinicas 
es de casi 140 Libras esterlinas, 
realsente compelitivo en precio 
frente a los sisteaas de fiastrad. 

Lo cierto es que algunas iaportantes 
casas de software llevan un tietpo 
dedicadas a la aisidn casi secreta 
de dotar al nuevo 128 de un aaplto 
soporte de prograaas que lo hagan 
atractivo para el usuario. 

La intencidn coaerciai parece clara, 
se tratarli de presentar al nuevo 
Sinclair co«o una excelente adquina 
de juegos con nuchas posibilidades y 
bajo precio, 

Nada se habla en torno a la 
coipatibilidad con el softttart ya 
emtente, pero parece asegurada. 


LO NUEVO DE 
BEYOND 


Li tiraa Beyond esta a punto de 
lanzar un prograaa en torno al que 
se han creado nuchas espectativas. 
Lleva por titulo Dark Sceptre y 
presenta personajes aniaados de gran 
taaano, en la hnea que en su 
aonento iniciara Tir Ha Hog . 

Se trata de un juego de aventuras 
recreado en la Edad aedia y el 
escenario es una isla en la que 
debes captar soldados para un 
ejercito que te ayudara a derrotar a 
los senores de Us soabras 
La perfeccidn y grade de detalle con 
que estan realizados los fondos y, 
particularaente, Los personajes le 
convierten en un previsibie exita, 


aundo de los prograaas, Esta vez es 
David Bowie quien entra en los 
planes de la tiraa fictivision . que 
ha qbtemdo los derechos para 
desarrollar un juego de aventura 
fantistica siguiendo ia traaa de la 
pelicula Labennto 
El papel de Bowie consiste en dar 
vida al rey de los duendes. El 
arguaento gira en torno a las 
fantasias de una nina que desea que 
los gnaaas y las hadas se lieven a 
su hemanito, para asi no tener que 
cuidarlo. 

El 1anzamiento esti previsto para 
finales de ano, coincidiendo con el 
estreno de la pelicula. 


PROGRAMA BASADQ EN 
SPLITTING IMAGES 


PROSRAMA DE 
SXGUE SI SUE SPUTNIK 


El con junto de aoda Sioue Si que 
Sputnik afiraa haber desarrollado un 
prograaa de juego y estin buscando 
quien se lo edite. El titulo 
inicialaente barajado es F-l-il, 

Love missile . 

La fecha que *as ies gusta para el 
lanzaaiento habria de coincidir con 
el lanzaeiento de su nuevo disco “El 
chico del siglo 21“. 


DAVID BOWIE TAMBIEN 
ENTRA EN EL SOFTWARE 


El conocidD prograaa de la 
television britinica que hace furor 
en nuestras pantallas, Splitting 
laaqes llega ahora al Spectrua de la 
nano de la casa de software Doaark 
en un prograaa titulado Split 
Personalities , 

En esencia el juego consists en un 
puzzle con personajes conocidos, 
aderezado con algo de dificultad en 
el aanejo para asegurar un aayor 
interfis. 

Otra novedad que tiene prevista esta 
firaa es el popular juego Trivial 
Pursuit . Es de suponer que no sea 
desarrollada una version en 
Castellano, aunque pndri ser una 
buena ocasidn para poner a prueba 
nuestros conociaientos del idioaa 
tnglds. 


Otro conocido cantante se ha 
decidido taabibn a participar en el 


INPUT 5 





















































MANE JO DEL BORDER 



La rutin a que presen tamos a conti¬ 
nuation cons is te en un ejempio de uti¬ 
lization practica de ia instruction 
BORDER desde el Codigo Maquina, 
consiguiendo interesantes efectos de 
ooioracion a modo de franjas de diver- 
ios colores que el lector podri elegir* 
Es una rutina «vistosa» v corta (sin que 
por ello deje de ser interesante)* 

AI manejo de BORDER en si, se le 
han anadido otras facilidades que se- 
nalamos a continuation, 

Desde Codigo Maquina se puede 
utilizar la rutina de varias maneras, al 
igual que en BASIC. La correct a y 
verdadera seria utilizando la rutina 
ubicada en la direction de memoria 
8859 de la ROM, Asf, cargando en el 
registro A el valor del color elegido. y 


ilamando a la rutina se consigue el 
efecto deseado; 

LD A,"color 11 
CALL 8859 

La alternativa que tenemos es utili¬ 
zar: 

LD A,"color" 

OUT C # F E > / A 

con lo que conseguimos un cambio 
«temporal» del color del borde, por- 
que el nuevo valor no es alniacenado 
en la variable del sistema ATTR P 
(23693), que conserva los colores 
«permanentes» de tinta, papeL horde, 
etc,.. En este caso el nuevo valor es al- 
macenado en la variable del sistema 
ATTR T (23694) que conserva los co¬ 
lores «temporales», Es decir, si desde 
el BASIC ejecutas: 

BORDER 0: OUT 254,2 

conseguiras cn principle el color 
rojo, pero si pulsas cualquier tecia vol- 


veras a obtener el negro (el permanen- 
te). 

En nuestro programs utilizamos la 
segunda option para conseguir la sin- 
cronizacion adecuada. Es esencial es- 
coger e! tiempo exacto con que Gam¬ 
bia de color el horde, si es mayor o 
menor no se consigue el efecto de una 
manera tan clara* Ademas desde el 
Codigo Maquina es mas dificil conse¬ 
guir la citada sincronizacion. 

En relation con este ultimo punto 
hay que destacar el uso de los bucles 
de retardo introducidos en las lineas 
100 a la 150, Su funcion es «perder» 
tiempo, contrarrestando la rapidez del 
Codigo Maquina. 

La rutina es un bude que se repite 
indefinidamente al igual que los reali- 
zados en BASIC, pero con la diferen- 
cia de no poder recuperar el control 
una vez iniciada su ejecuciom Para pa- 
liar esta posible desventaja se han in- 
troducido las lineas 210 a 240. Su fun¬ 
cion consiste en explorer el teclado y 
devolver el control al usuario una vez 
deteclada la pulsacion dc ia tecia ele* 
gida. 

Estas ultimas lineas suponen un 
gran paso adelante en la programacion 
en CM,, brindandonos la ocasion de 
ejercer un control mas real de nues- 
tros programas, al pasar del CM. al 
BASIC con mayor facilidad, 

El Spectrum lee el teclado cada 20 
milisegundos, dividiendo las cuatro fi- 
las de teclas en 8 semifilas, que se con- 
trolan desde el Codigo Maquina utili¬ 
zando el valor asignado a cada semifi¬ 
la, y dentro de cada semifila compro- 
bando la posible activation o desacti- 
vacion del bit adecuado con instruc- 
ciones como AND o BIT que reflejan 
su result ado en el flag Z. Los valores 
mencionados se indican en el cuadro 
de la izquierda, 

En nuestro caso intentamos com- 
probar la pulsacion ENTER : 

LD A / #BF ;Codigo de la 

semifila de 
ENTER 


BIT INDICAD0R 

0 

i 

2 

3 

4 


; C.Shi ft : 

z 

X 

C 

: V 

#FE 

; A : 

s 

c 

D 

F 

: G 

#FD 

■ G : W 

E 

R 

: T 

#FB 

1 : 

2 

3 

4 

: 5 

#F7 

: 0 : 

9 

8 

7 

: 6 

#EF 

* * 

: P 

0 

I 

U 

: Y 

#DF 

: Enter : 

L 

K 

J 

: H 

#BF 

: Space : S. 

Shift 


N 

: B 

#7F 

m ■ 

[ - — 

( 

■ 

COD 

IG0S DE 

SEMIFILA 



a INPUT 
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IN A,(#FE) ; Comun para AND 1 ;Tambien se puede Si la tccia no es pulsada, el valor dc 

todos Los hacer con BIT respuesta sera del tipo XXXI1111. Si 

casos 0,A se presiona, ei byte dc respuesta sera 



10 


ORG 

60000 

;Lugar de colocacion del C/M 


20 


ENT 

60000 

;Direccion de ejecucion 


30 

0TR0 

LD 

B,10 

;La rutina se hace 10 veces 


40 

BUCLE1 

PUSH 

BC 

;Contador del no. de veces que se hace 


50 


LD 

B,10 

;Para coger Los 10 colores de la tabla 


60 


LD 

IX,VAL 

;Se situa en la tabla de valores VAL 


70 

BUCLE2 

PUSH 

BC 

;Contador del no. colores tornados 


80 


LD 

A,(IX) 

;Guarda un valor de la tabla en A 


90 


OUT 

(#FE),A 

;Borde del color contenido en A 

I 

100 


LD 

B,0 

;De la linea 100 a la 150 inclusive 

110 

BUCLE3 

DJNZ 

BUCLE3 

; constituyen los bucles de retardo 

120 


LD 

B,0 

; cuya funcion especifica es perder 

130 

BUCLE4 

DJNZ 

BUCLE4 

; el tiempo exacto para que se consiga 

H 

140 


LD 

B,11 

; el efecto deseado. Esto es debido a 

150 

BUGLES 

DJNZ 

BUCLE5 

; la rapidez del c/m 

§ 

160 


INC 

IX 

;Se situa en eL sig. valor en la tabla 

170 


POP 

BC 

;Saca el valor introducido en 70 y lo 

180 


DJNZ 

BUCLE2 

;disminuye en 1, saltando si es <> 0 


190 


POP 

BC 

;Saea el valor del contador del prog. 


2 DO 


DJNZ 

BUCLE1 

;Lo disminuye en 1, y salta si es <> 0 


210 


LD 

A,#BF 

;Las lineas 210,220,230 esperan a que 


220 


IN 

A,(#FE) 

; putsemos La tecta ENTER. Una vez pul- 


230 


AND 

1 

; sada se activa el flag Z, RETornando 


240 


JR 

NZ,QTR0 

; al BASIC. Si no se pulsa va a OTRO 


250 


RET 




260 

VAL 

DEFB 

0,7 ,6,2, 

,0,4,2,3,6,1 ;Tabla de valores (colores) 


del tipo XXXI1110, el cual al sumarle 
00000001 (con AND 1) activara el flag 
Z. dando pie a una bifurcation eondi- 
cional del tipo JR Z o JR NZ (igual 
con JP Z o JP NZ). 

Como resumen de todo )o expues- 
to. pretendemos simular la siguiente 
rutina: 

10 PAUSE 1: BORDER 1: BORDER 

1: BORDER 6: BORDER 2: 

BORDER 0: BORDER 4: 

BORDER 2: BORDER 3: 

BORDER 7: BORDER 1: 

GO TO 10 

El equivalente en Codigo Maquina 
se muestra en la RUTINA 1. 

En la linea 260 se ban introducido 
los valores elegidos para las franjas del 
horde, por lo que pucden variarse sin 
problemas. Tambien, si deseamos 
conseguir un resultado mas estatico. 


se puede modificar el valor de la linea 
140 por 12. 

Para quienes no tengan cnsumbla- 
dor, adjuntamos el programa cargador 
de la rutina: 

10 CLEAR 59999: FOR N=60000 
TO 60053: READ A: POKE N, 
A: NEXT N 

20 DATA 6,10,197,6,10,221 ,33 
,140,234,197,221,126,0, 
211,254,6,0,16,254,6,0, 


16,254,6,11,16,254,221, 
35,193,16,233,193,16,223 
,62,191 ,219,254,230,1 ,32 
,213,201,0,7,6,2,0,4,2,3 
,6,1 

Los 10 iiltimos valores en la lista dc 
DATAs corresponden a los colores 
elegidos para la rutina, pudiendose 
modificar. La rutina es reubicable. 

Para ejecutar la rutina RANDOMI¬ 
ZE USR 60000. 


NO 0LVIDES EL TELEF0N0... © 

Cuando, por cualquier motivo, nos escribas, no olvides in- 
dicar tu numero de teiefono. Asi nos sera mas facil y rapido 
ponernos en contacto contigo. Gracias. 


INPUT 7 




























Se puede aprender a contar con los 
dedos y aprender a contar en base 16 * 
Pero aunque no tengas 16 dedos, en- 
contraras el manejo de cifras hexade- 
cimales mucho mas sencillo que tener 
que vertelas con grandes ristras de ce- 
ros y unos. 

Los ordenadores, en lo mas profun- 
do de sus circuitos hacen toda su arit- 
metica en binario, utilizando un siste- 
ma de numeros compuesto totalmen- 
te por ceros v unos, lo cual crea cier- 
tas dificultades a los ope rad ores hu- 
manos, 

En cuanto los numeros alcanzan un 
tamano moderado, en seguida te en- 
frentas con mas roscos que una fabri¬ 
cs de donuts , Y sio resulta sencillo te- 
ciear una serie larga de ceros y unos. 
Es muy facil cometer un error y es 
muy diffcil detecfarlo despues. 

La man era que tiene el operador 
para evitar estas dificultades es utili- 
zar una base de numeradon difereli¬ 
te. 

Los numeros hexadecimales son los 
que utilizan como base de numeracion 
el numero 16. Son lo suficientemente 
prdximos a los numeros de base 10 
como para resultar de manejo relati- 
vamente sencillo por parte de un ope¬ 
rador humano. 

Ademas 16 es igual a 2 x 2 x 2 x 
2, lo coal significa que la conversion 
entre binario y hexadecimal es simple. 
El numero decimal 16 se escribe 10 en 
hexadecimal y 10000 en binario. Ade¬ 
mas, todo numero entre el 0 y el 15 se 
represents mediante un numero bina¬ 
rio de cuatro dfgitos. 

Para poder utilizar un sistema de 
numeracion con una base mayor que 
10, hay que definir sfmbolos para los 
nuevos dfgitos* 

En hexadecimal. 10 se representa 
por A, once por R. doce por C, trece 
por D, catorce por E y quince por 
F. 


MANEJO DE LA ARITMETICA 

HEXADECIMT 


8 INPUT 

























■ 

POR QUE SE UTIUZAN 


LOS NUMEROS HEXADECIMALES 

■ 

CONTANDO DE 16 EN 16 

m 

RELACI0N ENTRE BINARIO 


Y HEXADECIMAL 


mdquina 


CONVERSION DE BINARIO A 
HEXADECIMAL 

La conversion a hexadecimal de los 
numeros binaries de ocho digitos que 



utilizan los ordenadores domesticos, 
es particularmente facil. Tienes que 
dividir ei numero en dos secciones de 
ocho digitos, A contirmacioiu los pri¬ 
me ros cuatro digitos se convicrtcn di- 
rectamente en un digitu hexadecimal, 
y los cuatro restantes se convierten en 
otro dfgito, 

La conversion de decimal a hexade¬ 
cimal es mas diffcil, Para hacerla tie¬ 
nes que hacer divisiones sucesivas del 
numero decimal per 16. Los restos re- 
sultantes en cada division son los digi¬ 
tos hexadecimales buscados. 

Por ejemplo, al dividir 1226 por 16, 
obtienes como cociente 76 y de resto 
10. En hexadecimal 10 se escribe A, 
76 dividido por 16 da cuatro y de res¬ 
to 12, que en hexadecimal se escribe 
C. Por ultimo, 4 dividido entre 16 da 
0 y de resto 4. En consecuencia 1226 
en decimal se escribe 4CA en hexade¬ 
cimal. 

El siguiente programa es bastante 
largo, pero merece la pena teclearlo, 
porque te ayudara a asentar en tu 
mente la forma en que se opera esta 
conversion: 


Teclea 


pars Spectrum 


20 CLS 

25 PLOT 140/0: DRAW 0/160 
30 PRINT INVERSE 1;AT 0,8; 

" BIN,DEC/HEX ’’ 

40 PRINT INVERSE 1;AT 4,2; 
'T2*ESPACI03BINARIC: 
C5*ESPACI0]" 

50 PRINT INVERSE 1;AT 9,2; 
"C2*ESPACI0DDECIMAL: 
C4*ESPACI03" 

60 PRINT AT 10,5; 

"+[3*ESPACI0j + C3*ESPACI03 
+C3*ESPACIO:+t3*ESPACIO]+ 
+C3*ESPACI0]+C3*ESPACI0]+" 
70 PRINT INVERSE 1;AT 17,2; 

"C2*ESPACI03HEXADECIMAL:" 
80 PRINT AT 18,4; 

"+[2*ESPACIO0+C2*ESPACIO3 

+C2*ESPACI0>" 

90 PRINT AT 18,20; 


”+L2*ESPACI0:+[2*ESPACI0] 
+ C2*E$PACI03=" 

100 LET N0=0 
110 GO TO 150 

120 LET AS>= INKEYS: IF A$="" 
THEN 60 TO 120 

130 IF A$=" " THEN LET N0= 
NO+1: IF N0=256 THEN LET 
N0=C 

135 IF A$= , ’B" THEN LET N0=N0 
-1: IF N0=-1 THEN LET NO 
=255 

140 IF A$="B” OR A$=" " THEN 
GO TO 150 
145 INPUT "?”;N0 
150 GO SUB 17C: 60 SUB 250 
160 GO TO 120 
170 LET NU=NG: LET C=128 
175 FOR X=0 TO 7 
180 LET N=0: IF NU>=C THEN 
LET N=1: LET NU=NU-C 
190 LET C=C/2 
200 PRINT AT 5,2+4*X;N 
210 IF N=1 THEN PRINT AT 10, 
2+4*X;C*2 

220 IF N=0 THEN PRINT AT 10, 
2+4*X;”OC2*ESPACIO0" 

230 NEXT X 

235 PRINT AT 13,6;"T0TAL 
DECIMAL= NO; 
"C2*ESPACI0D" 

240 RETURN 

250 LET HI=INT (NO/16): LET 
HH=HI 

260 LET L0=(N0-MI*16): LET 
LL=L0: IF L0>9 THEN LET 
L0=L0+7 

265 IF HI>9 THEN LET HI=HI+7 
270 LET HI=HI+48: LET L0=L0+ 
48 

280 PRINT AT 18,14;CHR$ HI; 

AT 18,30;CHR$ LC 
290 LET C=8 
300 FOR X=0 TO 3 
310 LET N=0: IF HH>=C THEN 
LET N=C: LET HH=HH-C 
315 LET M=C: IF LL>=C THEN 
LET M=C: LET LL=LL-C 
320 LET C=C/2 

330 PRINT AT 18,2+X*3;N;AT 
18,18+X*3;M 
340 NEXT X 

400 PRINT AT 21,6;"T0TAL HEX 
= ";CHRS HI;CHRS L0 
500 RETURN 


INPUT 9 









































20 CLS 

30 PRINT AT 0,9; 

" BIN, DEC,HEX " 

40 PRINT AT 4,4; 

n [2*ESPACI03BINARI0: 
L5*ESPACI03'' 

50 PRINT AT 9,4; 

11 [2*E$PAC 103 DECIMAL: 
H4*ESPACI03" 

60 PRINT AT 10,5; 

m +C3*espac:io^+i:3*espacjo] 
+ C3*ESPACI03 + tl3*ESPACI03 + 
C3*ESPACI01+C3*ESPACI03+" 
70 PRINT AT 17,4; 

"L2*ESPACI03HEXADECIMAL:" 
80 PRINT AT 18,4; 

"+C2*ESPACI03+C2*ESPACI0] 

+C2*ESPACI03=" 

90 PRINT AT 18,20; 

"+ C2*E$PACI03+!I2*ESPACIC3 
+L2*ESPACI03=" 

100 LET NO=G 
110 GO TC 150 
120 LET A$=INKEY$ 

125 IF A$="" THEN GOTO 120 


130 IF A$=0 M F 1, THEN GOTO 135 

131 LET N0=NQ+1: 

132 IF N0=256 THEN LET N0=0 

135 IF A$<> M B" THEN GOTO 140 

136 LET NO=N0-1 

137 IF N0=-1 THEN LET NO=255 
140 IF A$="B" OR A$="F” THEN 

GOTO 150 
145 INPUT NO 
150 G0SU6 170 
155 GOSUB 250 
160 GOTO 120 

170 LET NU=NC 

171 LET C=128 
175 FOR X=0 TO 7 
180 LET N=0 

185 IF NU>=C THEN LET N=1 

186 IF NU>C THEN LET NU=NU-C 
190 LET C=C/2 

200 PRINT AT 5,2+4+X;N 
210 IF N=1 THEN PRINT AT 10, 
2+4*X;C*2 

220 IF N=0 THEN PRINT AT 10, 
2+4*X; "0C2*ESPACI03 11 
230 NEXT X 


235 

PRINT AT 13,6; 

"TOTAL 


DECIMAL= ";NC; 




"L2 

*ESPACI03" 



240 

RETURN 



250 

LET 

HI=TNT (NO/16) 


255 

LET 

HH=HI 



260 

LET 

L0=(N0-HI*16) 


261 

LET 

LL=L0 



270 

LET 

HI-HI+28 



275 

LET 

L0=L0+28 



280 

PRINT AT 18,14 

;CHRl HI; 


AT 

18,30;CHRS 

L0 


290 

LET 

C=8 



300 

FOR 

X=0 TO 3 



31C 

LET 

N=0 



311 

IF 

HH>-C THEM 

LET 

N=C 

312 

IF 

HH>=C THEM 

LET 

HH= 


HH- 

C 



315 

LET 

M=0 



316 

IF 

LL>=C THEN 

LET 

M=C 

317 

IF 

LL>=C THEN 

LET 

LL= 


LL- 

C 



320 

LET 

C=C/2 



330 

PRINT AT 18,2+ 

X*3; 

N; AT 


18, 

18+X*3;M 
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340 NEXT X 

400 PRINT AT 21 7 6;"TOTAL 
HEX= M ;CHRS HI;CHRS LO 
500 RETURN 

Cuando hayas tedeado todo el pro- 
grama y lo ejecutes, observaras que se 
ponen a cero todos los numeros; bina- 
rios T decimales y hexadecimales. Si 
aprietas ia tecla espaciadora aparece- 
ra un 1 en cada base* Sigue apretando 
y el ordenador se pondra a con tar, so- 
mando cada vez 1 a cada uno de los to- 
taies, Observa que el equivalente de¬ 
cimal se calcula sumando el valor de 
todo lugar que en binario tiene un 1. 

El valor hexadecimal se calcula ha- 
ciendo exactamente lo mismo, salvo 
que se toman cuatro digitos a la vez* 

A! pulsar la tecla B, se restara 1 de 
cada uno de los numeros y se ejecuta- 
ra el programa. 

Puedes aimacenar este programa y 
utilizarlo para convertir en hexadeci¬ 
mal numeros en binario siempre que 
te haga falta. La forma rapida de ha- 
cer esta conversion es pulsar cualquier 
teclado, con excepcion de la barra de 
espacio o la B. En la pantalla apare- 
cera un signo de interrogaeidn. Intro¬ 
duce cualquier numero decimal que 
sea menor que 255, pulsa ENTER 
y te aparecera su equivalente en bina¬ 
rio y en hexadecimal* 

Observaras que el numero mayor 
que puede ser representado por un nu¬ 
mero de ocho bits en binario, es dedr 
por un byte, es 111 11 111* Su equiva¬ 
lente decimal es 255, que en hexade¬ 
cimal se escribe 255. Este es el mayor 
numero posible de dos dfgitos en he¬ 
xadecimal* Cualquier numero almace- 
nado en un byte de la memoria de tu 
ordenador puede representarse en he¬ 
xadecimal por medio de dos digitos* Y 
todo el ienguaje maquina esta cons- 
trufdo enteramente a base de estos nu¬ 
meros hexadecimales de dos digitos, 


NUMEROS MAS GRANDES 


Tu ordenador es capaz de mane jar 
numeros mayores que 255, por el sen- 
cillo metodo de fraccionarlos en dos 
partes y almacenarias en dos posicio- 
nes adyacentes de memoria* Esto te 
permitira aimacenar cualquier nume¬ 



ro hasta FFFF en hexadecimal, o lo 
que es igual, 65535 en decimal. FFFF 
es un numero muy importante en los 
ordenadores domesticos, ya que es el 
maxima numero de posiciones de me¬ 
moria que se pueden direccionar. 

Se pueden aimacenar en memoria 
numeros aun mayores, fraccionando- 
los en tres o cuatro bytes y almacenan- 
dolos en direcciones de memoria su- 
cesivas, En cuanto a ia forma de ai¬ 
macenar dichos bytes, es una euestion 
de convenio. En tu maquina se alma¬ 
ce na el byte mas bajo en la posicidn 
de memoria mas baja y el byte alto en 
la posicion mas alta de memoria. 

I Pero de que manera se represen- 
tan en hexadecimal los numeros nega¬ 
tives? Nos ocuparemos de ello mas 
add ante. 


CONVERSION DE HEXADECIMAL 
A DECIMAL 


Cada dfgito sucesivo de un nuinert) 
expresado en forma hexadecimal tie¬ 
ne un peso 16 veces superior que el df- 
gito que queda a su derecha. Asf, para 
convertir en decimal un numero como 
F6DA, se toma el numero de la dere¬ 
cha y se convierte a decimal* Como es 


A, su valor es 10. El siguiente dfgito 
de la izquierda tiene un peso 16 veces 
mayor, por lo que hay que pasarlo a 
decimal y multiplicarlo por 16* A! ser 
el numero D, que vale 13, tenemos 
13x16=208. El siguiente dfgito por la 
izquierda tiene un peso 16 veces ma¬ 
yor, o sea, 6xl6x 16=1536. El ultimo 
dfgito de la izquierda ha de multi pli- 
carse aun por 16 una vez mas. Como 
es el numero F, que vale 15, tenemos; 
15x16x16x16=61440. Asf el numero 
F6DA en hexadecimal sera en decimal 
10 + 208 + 1536 + 61440 = 63194. 
Tambien puedes utilizar el programa 
anterior para convertir los dos nume¬ 
ros hexadecimales al misrno tiempo y 
a continuaeion multiplicar el de la iz¬ 
quierda por 256. 

Al ej ecu tar el programa se ponen a 
cero las tres lineas. Pulsa B y la Ifnea 
de binario se llenara con 1. Mas abajo 
la Ifnea de decimal se llenara con po¬ 
le ncias de dos. De derecha a izquier¬ 
da obtienes 1, que es 2 elevado a ia po- 
tencia cero, 2, que es 2 eievado a la 
primera potencia, 4, que es 2 al cua- 
drado, etc. La Ifnea de hexadecimal 
funciona de la misma manera, excep- 
to que los dos digitos se calculan inde- 
pendientemente* 


INPUT 11 

















HARDCOPY DESDE 
CODIGO MAQUINA 


Si posees una impresora tipo ZX- 
PRINTER habras observado el facil 
manejo del comando COPY, pero tam- 
bien pronto te daras cuenta de las re- 
due id as prestaciones que ofrece a cam- 
bio* 

El Spectrum viene preparado para 
funcionar directamente con su impre- 
sora propia, pero con las matriciales 
te nemos que vale r nos de un interface 
que gestione la comunicacion. Asf po- 
demos obtener listados y copies de 
pantalla, pero siempre en el margen 
izquierdo. 

Con este artfculo pretendemos dar- 
te unas Ifneas generates pare que, me- 
diante unos ciertos conocimientos del 
codigo maquina y la previa adaptacion 
a tu eqtiipo, saques el mayor rendi- 
miento a tu conjunto interface/impre- 
sora matricial. Nos centraremos en las 
posibilidades graficas, presentando un 
programa en c.m. para realizar un 
hardcopy (copia de pen tall a en papel) 
eligiendo la columns de impresion 
(una gran ventaja), y con la posibili- 
dad de mezclarlo posteriormente con 
el texto —potenciando el uso de tu 
procesador de texto. No todo son lis¬ 
tados, * . 

El primer problema que se nos pre- 
sente es el de la estructura de la me- 
moria de pantalla, compuesta de 24 fi¬ 
les y 32 columnas. Las 24 filas quedan 
divididas en 3 tercios de 8 filas cade 
uno, que seran tratados de manera to- 
telmente independiente en cuanto al 
mane jo de los datos contenidos en 
cada uno de ellos. Las filas deben ser 
entendidas como hileras de caraeteres, 
pero cada simboio escrito ocupa 8 
bytes en la memoria de pant alia, por 
lo que una fila de caraeteres se com- 
pone a su vez de otras 8 pequenas If¬ 
neas de 32 bytes cada una. Asf una fila 
de caraeteres tendra 32 * 8 = 256 bytes 
y cada tercio 256 * 8 = 2048 bytes es 
dedr 2 Kvtes cada uno. Asf una pan- 


talla entera tendra 6 Kbytes, los 3 ter¬ 
cios (la memoria de atributos no sc 
utiliza). Tambien es de resaltar que 
una pant alia puede estar dibujada y no 
solo escrita, por lo que cada caracater 
ser fa un «trocito» con 8 bytes de in- 
formacion del grafico en pantalla. 

Es tamos acostumbrados a imprimir 
un simboio en pantalla y que su apa- 
ricion sea inmediata. La dificultad co- 
mienza cuando queremos recuperar 
eso datos insertos en la memoria, y 
utilizarlos para hacer. como en nues- 
tro caso, un hardcopy . En cada uno de 
los citados tercios de pantalla —las 
primeras ifneas de 32 bytes de cada 
una de las 8 filas de caraeteres— son 
almacenadas una tras otra. Por lo tan- 
to no se aim ace nan primero las 8 If¬ 
neas de la primera fila, sino la prime- 
ra Ifnea de la primera fila, despues al 
primera Ifnea de la segunda fila, asf 
hasta la octava, para seguir luego con 
la segunda Ifnea de la primera fila, la 
segunda de la segunda fila, etc... Va 
saltando de 8 en 8 Ifneas hasta com- 
pletar un tercio de pantalla, y despues 
seguir rellenando los otros dos con el 
mismo sistema* 

Todo lo expuesto se puede compro- 
bar en el proceso de carga de una pan¬ 
talla desde cassette. Tambien se pue¬ 
de probar manejando la memoria de 
pantalla mediante POKE. Si esta par¬ 
te de la memoria empieza en la posi- 
cidn 16384 ($4000), podemos probar 
CLS: POKE 16384,255 y conseguiras 
llenar el primer byte de la primera If¬ 
nea contenida en la primera fila. Para 
imprimir algo inmediatamente debajo 
I o I 6 g i c o s e r f a h a c e r POKE 
16384+32,129, pero esto corresponde 
a la primera Ifnea de la segunda fila. 
Lo correeto serfa hacer: POKE 
16384+(32*8), 129 (hemos sumado a 
partir de la position initial los 32 bytes 
de las 8 primeras Ifneas de cada fila). 

Debido a esta disposition de la me¬ 
moria de pantalla hay otro factor im- 





portante a la hora de hacer el progra¬ 
ma, v es que al copiar en papel las im- 
presoras matriciales divider] cada ea- 
racter en 8 barras vcrticales de 8 pixel 
cada una, lo que ocasiona, sob re todo 
desde el c.m., tener que hacer una se- 
rie de bucles anidados un poco com- 
plejos, Para conseguir obtener cada 
una de las 8 barras verticales tenemos 
que tomar un pixel de cada uno de los 
8 bytes definitorios del caracter repre¬ 
sent ado (estos 8 bytes tie non unos dis¬ 
position «hortzontal». recuerda los 
POKEs anteriores), De esta manera 
como cada caracter o «trocito» de gra¬ 
fico tiene sus bytes situados cada 8 If- 
neas, para definir dicho grafico nece- 
sitamos hacer 7 saltos/barra * 8 barras 
= 56 saltos. 

De la idea anterior se desprende la 
necesidad de una forma rapida de rea- 
lizar tan ingente numero de saltos, y 
se impone el c.m.. Para contrastar 
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rrtero que multiplicado per 1/18 nos da 
la magnitud en pulgadas del salto, En 
nuestro caso hacemos 27,76,2 per lo 
que el espacio emre Ifneas sera 1/9 de 
pulgada, que sera inapreciable* Una 
vez terminada la rutina debemos res- 
tablecer el valor inicial 27,76,7 por lo 
que la distancia entre lineas sera ma¬ 
yor (1/6 de pulgada), espaciado nor¬ 
mal mente utilizado en un proceso de 
escritura normal. Esta ultima action 
es realizada por las lineas 680 a 730 
del listado* 

• Este envfo de datos a la impreso- 
ra desde e.m, sera similar a la instruc¬ 
tion BASIC: 

LPRINT CH R$ 27:CHR$76:CHR$ 
N (N=2 6 3) 

• A continuacion vicne la compli- 
cada estructura de bucks am dados 
que nos van a permitir ir tom an do una 
a una tod as las «barras» verti calcs 
constituventes de cada caracter* con la 
salved ad de tener que ir tomando los 
bits de arriba had a aba jo, asi el mo¬ 
nos significative sera ei tornado el pri 
mero (el mas alto). I n otros modclos 
de impresora* como las upo Epson n 
Admate la mencionada barra vertical 
es to mad a de ah a jo a am ha, \icndu 
por tanto el menus sigmfieati\o el mas 
bajo. 

• En un principio eareamos oat el 
registro doble Dh la dir avion Jc don 
de empezamos a lomar In lev que lo 
gieamente sera el eomun/o de la hr 
moria de pantalla* la 1MM {Sit hum 

• El BUC'LEO abarea tie hi hnea 
170 a la 670, Es el que eonliene a lo^ 
demas y el encargado de que el pro¬ 
ceso se repita ires voces, una por cada 
tercio de pantalla. 

• El BUCLE1 (190-600) ejeeuta d 
proceso 8 veees* una vez por cada una 
de las 8 filas del tercio. 

• El BUCLE2 se repitc 32 voces (el 
contador B es cargado con 32* LD* 
B,32) va que cada fila posee 32 carac- 
teres. Pero antes de empezar a repet ir 
el proceso y cada vez que lo hagamos. 
hemos de enviar los datos a la impre- 
sora: 

• La informacion para colocar el co¬ 
rn ienzo del hardcopy en el pixel *n» 
que van a dentro del ran go eompren- 
dido entre 0 v 480 (el 480 es para una 
impresora matricial de 80 columnas. 


HARDCOPY EN CODIGO 
MAQU1NA 


El comentario de la rutina podria 
ser el siguiente: 


ideas comcntamos cl caso de la impre¬ 
sora del Spectrum que. en vez de ir to¬ 
mando las barras verticales, se coloca 
al principio de cada linea de 32 bytes 
y va enviando la informacion a un buf¬ 
fer en el orden ya coni ent ado. Cada 
vez que se ilena el buffer con una IE 
nea, esta es impresa. 

La serie de programas que presen- 
tamos a continuation* estan prepara¬ 
dos para una impresora tipo Seikosha. 
Por si no dispones de una, intentare- 
mos destacar los detalles diferenciado- 
res mas importantes para que puedas 
adaptar e! programa facilmente con- 
sultan do su manual de instrucciones. 


• En primer lugar debemos abrir el 
canal hacia la impresora* el niimero 3 
(Ifneas 90 y 100). Como recordaras si 
el canal abierto es el 2, todo uso de la 
instruction RST $10 produce una im- 
presion en pantalla. 

• A partir de ahora comienzan una 
serie de bloques de datos que son en- 
viados a la impresora y que son nece- 
sarios para cl cometido que pretende- 
mos, Tod a esta informacion es envia- 
da mediante la instruction RST SU) 
que, como podremos comprobar, es 
una de las esenciales en esta rutina. 
Con esio y pocas instrucciones mas 
nuestra rutina esta casi terminada. 

• LI primer bloque a I que hacemos 
referencia es el que elimina el espacio 
entre lineas (de 100 a 150). En nues¬ 
tra copia de pantalla no necesitamos 
dicho espacio y por ello cjecutamos la 
instruccion de la impresora: 

ESC L (27,76,N) donde N es el nu- 
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pero los caracteres imprexos son de 
8*6 pixels , es decir 6 pixels de ancho. 
por lo que cuando hagamos una copia 
de pantalla escrita, al no utilizar el 
juego de caracteres de la impresora, 
nos dara la sensacion de ser una letra 
mas achat ad a aunque en realidad sea 
una copia de la letra del Spectrum). 
En este caso el valor elegido para n es 
80. por tanto ejecutaremos la instruc¬ 
tion de la impresora : 

ESC. POSXhBO es decir. enviare- 
mos los codigos 27.16,0.80. La ejeeu- 
cion de esta rutin a es la que nos per- 
mite la co men tad a facilidad de elegir 
el lugar de impresion, pudiendo va- 
riarlo con solo alterar los dos ultimos 
numeros, que es la cifra de dos bytes 
conteniendo la direccion. Por lo tanto 


si queremos empezar a imprimir en el 
pixel 276 deberemos cambiar dichos 
datos por 27,16,1,20 ya que 
276=1*256-+20 (lineas 210 a 280 de 
nuestro listado). Una vez mas insisti- 
mos en la necesidad de comprobacion 
de los datos anteriores con el manual 
de la impresora en particular. 

A parte de lo anterior, la ejecu- 
cion del BUCLE2 tambien requiere 
enviar a la impresora la information 
necesaria para especificar que los si- 
guientes 256 caracteres a imprimir son 
bytes graficos, es decir una fila de 32 
caracteres con 8 bytes (o «barras») 
cada caracter, Esto se consigue ejecu- 
tando la instruccion de la impresora 
ESC G 1,0 o enviando por via RST 
$10 los datos 27,71,1.0 (es decir 


1*256+0), En nuestro listado las fi¬ 
ll eas 290 a 360. 

• Para cada uno de los 32 caracte¬ 
res debemas tomar los 8 bytes grafi¬ 
cos que lo constituyen. El BUCLE3 a 
parte de ser el encargado del proceso 
anterior a su vez contiene al BIX LI 4 
que se repertira otras 8 voces pani ir 
tomando cada bit de la man or in dc la 
pantalla y que scran los const nine 

de las «barras». Estos dos ultimos bu¬ 
cks son los que reulmentc sc l ncargan 
de tomar los datos graficos I , » ante- 
riores eran la repetition uu mi man 
exacto de veces del proevsn principal 

• Los pasos principalcs a vnnr 
son: 

• Pasamos la direccion dc icK -mi 
cia contenida cn cl resistro 1 >1 ai 111 

4 _ 




C/. DUQUE DE SESTO, 50. 28009 MADRID 
METRO O'DONNELL O GOYA 

OFERTAS DE SOFTWARE: ||2 PROGRAMAS AL PRECIO DE II! Y ADEMAS 
REGALO FIN DE CURSO, UNA CALCULADORA COMPLETAMENTE GRATIS l jASOMBROSO!! ^VERDAD? 


STAINLESS STEEL 

PYRAURSE__ 

PENTAGRAM_ 


SUPER SERIES_ 

KUNG FU MASTER 

COBRAS ARC_ 

CAULDRON II_ 


2.100 ptas. 
2.100 ptas. 
2.300 ptas. 
2.900 ptas. 
2.100 ptas. 
2.300 ptas. 
2.100 ptas. 


JACK THE NIPPER_ 

LAS TRES LUCES DE GLAURUNG. 

QUAZATRON_ 

BATMAN_ 


PHANTOMAS II 
PHANTOMAS _ 
EQUINOX _ 


2.100 ptas. 
2a 00 ptas. 
2.100 ptas. 
2.100 ptas. 
2.100 ptas. 
2.100 ptas. 
2.100 ptas. 


SOFTWARE DE REGALO (OFERTA 2x1) 

FIGHTING WARRIOR-DUMMY DUN-BOUNTY BOB-SOUTHERN BELLE-SHADOW FIRE 



SPECTRUM PLUS + 6 JUEGOS 
25.900 PTAS. 

GRATIS 1 QUICK SHOT V 
O 2 WALKIE TALKIES 



PTA - 


INTERFACE CENTRONICS RS-232 
CASSETTE ESPECIAL ORDENADOR 


3.495 ptas. 

4.495 ptas. 


PRECIOS EXCEPCIONALES PARA TU AMSTRAD CPC-464, CPC-6128, PCW-8256 


QUICK SHOT I + INTERFACE 
QUICK SHOT II + INTERFACE 
QUICK SHOT V + INTERFACE 


2.695 ptas. 
2.995 ptas. 
2.995 ptas. 


QUICK SHOT I . 
QUICK SHOT II 
QUICK SHOT V 


1.395 ptas. 
1.695 ptas. 
1.695 ptas. 


Pedidos contra reembolso sin ningun gasto de envfo. Tel6fs.: (91) 275 96 16 - 274 75 02, o escribiendo a 

MICRO-1. C/. DUQUE DE SESTO, 50. 28009 MADRID 

GRANDES DESCUENTOS PARA TIENDAS Y DISTRIBUIDORES 
DIRIG IRS E A: DIPROIMSA. C/. GALATEA, 25. TELF.: (91) 274 75 02 






































































En un principle la direction del DE 
sera la 16384, pero luego ira cambian- 
do (400,410) 

* Giramos el contenido de la direc¬ 
tion apunrada per el registro HL (li¬ 
nes 440), Como ya sabemos el conte¬ 
nido de una direecion de rnemoria, es 
un byte que puesto en binario se corn- 
pone de ceros y unos. Un uno se de- 
bera traducir en un punto en el papel 
y el cero en un bianco. Tenemos que 
conseguir pasar esos ceros y unos a la 
impresora, pero el problema radica en 
la forma de hacerlo, ya que debemos 
tomar cada bit por separado de cada 
uno de los 8 bytes de un caracter, que 
a su vez estan separados por 8 Imeas. 
Para realizar el giro del contenido de 
la direecion elegida utilizamos la ins- 
truccion RLC (HL) (Rotate Left Cir¬ 
cular) es deeir realizamos un giro a la 
izquierda pasando el bit 0 a la position 
de! bit 1, el bit 1 a la del 2 y asi hasta 
Hegar al bit 7 que pasa a la posicidn 
del bit 0 y al carry. Por lo tanto si ha- 
cemos ahora un giro a la derecha en 
eLregistro A pero con la intervention 
del acarreo (RRA), conseguiremos 
pasar el contenido del bit 7 al A (el 
contenido de! bit 7 fue pasado al aca¬ 
rreo). Para entenderlo mejor pondre- 
mos un ejemplo: Si el contenido de 
HL es 131 al hacer RLC (HL) queda- 
ra 131 —y 10000011 RLC 
00000111 acarreo —* 1 si e! registro A 
tiene 8 bits no especificados, al ejecu- 
tar RRA, conteniendo el acarreo un 1 
quedara; 

A —► xxxxxxxx —> RRA —> Ixxxxxxx 

No jmporta el contenido inicial de 

A, pues a! repetirse el proceso 8 ve- 
ces acabamos llenando dicho registro 
con 8 bits nuevos, que seran los bits 
de la «barra vertical». 

* Una vez ejecutada la subrutina 
anterior incrementamos H (460), con 
lo que pasamos al byte 16384+256 en 
la primera linea de la segunda fila, lu- 
gar donde esta situado el segundo byte 
constitutive del caracter. Colocados 
aquf realizamos la misma operation de 
antes (RCL(HL), RRA) 8 veces (LD 

B, 8 .... DJNZ BUCLE4) con lo que 
conseguimos llenar el acumulador con 
los valores deseados. A grandes ras- 
gos este seria el sistema utilizado para 
el hardcopy, Solo resalt ar que en otras 


impresoras, como las Epson o Adma- 
te, ei valor de los bits en la barra ver¬ 
tical se toma al reves, siendo el mas 
significativo ei mas bajo debiendo por 
tanto cambiar las instrucciones 440 y 
450 por: 

440 BUCLE4 RRC (HL); Giro a la 
derecha 

450 RLA ; Giro a la izquierda con 
carry 

La linea 480 envia los datos obteni- 
dos a la impresora, En las 510 y 520 
(una vez definido el caracter) pasamos 
ia direecion inicial guardada en el DE 
al HL. Incrementamos HL (530) con 
lo que pasaremos a la direecion de me¬ 
moria contigua (no como al ineremen- 
tar H que pasabamos 256 mas adelan- 
te), En la 540 devolvemos el nuevo va¬ 
lor al DE con lo que habremos cam- 
biado la direecion de referencia y es- 
taremos listos para empezar a definir 
el caracter siguiente. 

* Una vez finalizado el BUCLE2 
(hemos enviado a la impresora una fila 
de caracteres) ej ecu! am os el codigo de 
la impresora LF (10), que indica que 
imprima todo lo hay en el buffer , vaya 
al final de linea y haga un retorno de 
carro (570,580). Hemos de aclarar que 
todo lo enviado a la impresora fue al- 
macenado en el buffer , y no se impri- 
me hasta que aparece la orden de «ali- 
mentacion de linear (line feed), LF 
(codigo 10). 

• Una vez impreso un tercio de 
pantalla abrimos un pequeho bucle 
(BUGLES) para pasar a la position 
inicial dd siguiente tercio, Para ello 
tomamos la posicidn de referencia del 
registro DE, la introducimos en HL 
(610 EXX DE.HL) e incrementamos 
H sietc veces o 2 Kbytes menos 256 
bytes. Mas tarde se devuelve al DE 
(650). 

NOTA: Para utilizar esta rutina con 
el Interface I o el Discovery 1 es nece- 
sario abrir el canal «b», que destoke- 
niza los comandos del Spectrum (con 
estos interfaces utilizamos norm a I me n- 
te el canal «t»), Aetna de manera si¬ 
milar con otros interfaces. 

10 

20 ; HARDCOPY GP250-X 

30 


40 

* 

0 

M0LIS0FT 

50 




60 


ORG 

60000 

70 


ENT 

60000 

80 


L0 

A,3 

90 


CALL 

#1601 

100 


LO 

A,27 

110 


RST 

#10 

120 


LD 

A,76 

130 


RST 

#10 

140 


LD 

A,2 

150 


RST 

#10 

160 


L0 

DE,#4000 

170 


L0 

B,3 

180 

BUCLE0 

PUSH 

BC 

190 


L0 

B,8 

200 

BUCLE1 

PUSH 

BC 

210 


LD 

A,27 

220 


RST 

#10 

230 


LD 

A,16 

240 


RST 

#10 

250 


LD 

A/0 

260 


RST 

#10 

270 


LD 

A / 80 

280 


RST 

#10 

290 


LD 

A,27 

300 


RST 

#10 

310 


LD 

A,71 

320 


RST 

#10 

330 


LD 

A/1 

340 


RST 

#10 

350 


LD 

A/0 

360 


RST 

#10 

370 


LD 

B/32 

380 

BUCLE2 

PUSH 

BC 

390 


LD 

B/8 

400 

BUCLE3 

PUSH 

DE 

410 


POP 

HL 

420 


PUSH 

BC 

430 


LD 

B/8 

440 

BUCLE4 

RLC 

CHL) 

450 


RRA 


460 


INC 

H 

470 


DJNZ 

BUCLE4 

480 


RST 

#10 

490 


POP 

BC 

500 


DJNZ 

BUCLE3 

510 


PUSH 

DE 

520 


POP 

HL 

530 


INC 

HL 

540 


EX 

DE/HL 

550 


POP 

BC 

560 


DJNZ 

BUCLE2 

570 


LD 

A/10 

580 


RST 

#10 
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tolieaciones 


590 

POP 

BC 

600 

DJNZ 

BUCLEl 

610 

EX 

—i 

V 

LU 

O 

620 

LD 

B,7 

630 BUCLE5 

INC 

H 

640 

DJNZ 

BUCLE5 

650 

EX 

DE,HL 

660 

POP 

BC 

670 

DJNZ 

BUCLE0 

680 

LD 

A,27 

690 

RST 

#10 

700 

LD 

A,76 

710 

RST 

#10 

720 

LD 

A, 3 

730 

RST 

#10 

740 

RET 



CARGADOR BASIC DE LA RUTINA 
HARDCOPY GP 250-X 


La rutina es totalmente reubicable, 
y dada su corta longitud (100 bytes) 


puede pasar a formar parte de cuaL 
quier programa en c.m. De todas ma* 
neras adjuntamos el cargador BASIC, 
con la facilidad incluida de eleccion de 
la columna de impresion. La columna 
elegida debe estar entre la 0 y la 37. 
Si intentaramos imprimir en la 38, 
como la pantalla ocupa mas de 42 co- 
lumnas (256 bytes de largo), saldrfa- 
mos del If mite de las 80 columnas (480 
bytes, porque cada columna tiene 6 pi¬ 
xels de largo). Ademas con este pro¬ 
grama podemos imprimir esas dos ul¬ 
timas filas que siempre se nos resisten, 

10 CLEAR #: OPEN #3;"B" 

20 CLEAR 59999: FOR N=60000 
TO 60099: READ A: POKE N, 
A: NEXT N 

30 INPUT PAPER 6; INK 0;" 

COLUMNA DE IMPRESION?' 1 ;A 
40 IF A<0 OR A>37 THEN GO 
TO 30 

50 POKE 60033,INT (A*6) 


60 LOAD ""SCREENS : 
RANDOMIZE USR 60000: 
PAUSE 0: GO TO 30 


100 

DATA 

62,3,205,1,22 

,62,27 


,215, 

,62,76 


200 

DATA 

215,62,2,215, 

17,0, 


64,6, 

,3,197 


300 

DATA 

6,8,197,62,27 

,215, 


62,16 

',215,62 


400 

DATA 

0,215,62,80,215,62 


,27,215,62,71 


500 

DATA 

215,62,1,215, 

62,0, 


215,6 

,32,197 


600 

DATA 

6,8,213,225,1 

97,6, 


8,203 

,6,31 


700 

DATA 

36,16,250,215 

,193, 


16,241,213,225,35 


800 

DATA 

235,193,16,231,62, 


10,21 

5,193,16,198 


900 

DATA 

235,6,7,36,16 

,253, 


235,1 

93,16,185 


1000 

1 DATA 

62,27,215,62 

,76, 


215, 

62,3,215,201 



Of erta Especial 
para los lectores 
de INPUT Sinclair 



LIMITADA A LOS lOO PRIMEROS 
CUPONES RECIBIDDS 



DESEO RECIBIR EN MI CASA EL DISPOSITIVQ 
SLOMO AL PRECIO BE 3.400 PT9 (IVA + GASTOS 
DE ENVIO INCLUIDOS). 


NOMBRE 1.Jl_I_I_1_I_L_It.J_li_1L.I_1 

1e r. aPELLIDO l L 1 1 t I t E I ill _L 

2°- . APELLIDO I_I_1_L-J_I_1 . 1 . 1 . 1_Li_i 

DIRECCI ON I_L.6_i. JLJLjL-J_L_JL.±.JL.JL._L.JL 

■..... i _L._fi.. L . I . m L .-.a—_L. L . 1 —j.ii.J.. —j.. 

CIUDAD i i l_J .1... I J I J t 1—J—I Jt i—JL~ 

COD I GO POSTAL !_11_JL.JL._LJ FIRMA: 

PROVING IA L.Jl._t_I_i_I_I—! 

DUE PASARE MEDIANTE: 

L,_j TALON NDMINATIVD 

ADJUNTO (DATAMARKET 


a j 


JL. 


L_JL 




i I_j CONTRARREMBQLSO 


Cien lectores de INPUT 
Sinclair pueden adquirir 
el dispositivo SIomo . 
cuyo p.v.p, en camercios 
ronda las 4■400 pts. . 
al precia de promocian 
de 3.400 pts. . 

Si deseas bene-f i c i a r t e de 
esta colosal oferta, 
recorta o copia y 
envia el cupon at 
DataMarket. 

Avda. Ramon y Cajal, 107. 
28043 MADRID 


16 INPUT 


























jNO TE PIERDAS NI UN SOLO EJEMPLAR! 


INPUT SINCLAIR quiere proporcionar 
a sus lectores este nuevo servicio de 
ejemplares atrasados para que no pierdan la 
oportunidad de tener en sus hogares todos 
los ejemplares de esta revista, lider en el 
mercado espanol. 

Podreis solicitar cualquier numero de 


INPUT SINCLAIR que querais, siempre al 
precio de cubierta (sin mas gastos). 

Utiliza el cupdn adjunto, enviandolo a 
EDISA (Dpto. de Suscripciones), Lopez de 
Hoyos, 141 - 28002 Madrid, o bien ll&manos 
por tetefono al (91) 415 97 12. 



’ j ■ 

pg 

ITT r TT 1 i 1 1 1 ‘— 

CRT u 

'*£[,—j-u -JjI 

- jHk^} 

J J 

Eyi »■ 

up 7 





GB&FUlIttOKA 

UHMDWIDS 

CQHIDOL 

niiiuutCLA 


TTTTTTTTTimEr 


CUPON DE PEDIDO 


D:TECCIQW Dt DBJITOS 
M PAKftU.fi 

tftfiflCGS 
m JOYSTICK 


SI, envlenme contrarreembolso ejemplares de INPUT 
SINCLAIR de los numeros: 

(marca con una (X) tu eleccion) 


NOMBFE i i i 


APELLIDOSi_1_I_!_ l -l .1 _L 


DOMIC1LIO ... l l i l I l l l l l .■ i 1 l l i l I i l I i l I l 

NUM. 'It' PISO Ll-l ESCALERA (_l_ i COD. POSTAL i l i i l i 

POBLACION i i i i ■ i i i i i-i- J — L- i i i i I i PRQV i i I i i i . 

TELEFONO I i l i I i J_ J FIRMA 


IHE98E 







i" -" 

■ 



j WMf _ 

■uni D 

1 


































































































































TODO LO QUE SUBE, 
BAJA 


■ 

TRAYECTORIAS DE UN PROYECTIL 

■ 

DIFERENTES CAMPOS 

GRAVITAT0RI0S 

■ 

SIMUL4CI0N DE PARABOLAS 

■ 

CAMBIAN00 EL ANGULO 


«Lance unit flecha por los aires, cayo 
a tierra, no se en que punto»* Aqui tie- 
nes la forma de hacer que tu ordena- 
dor haga por ti este caiculo. ademas de 
unas cuantas rutinas que pueden ser- 
virie para construir exdtantes juegos 
de accidn. 

Hay una especial belleza en la con- 
templacion de un ordenador mientras 
dibuja la trayectoria de un objeto vo- 
lador, y existen muchos ejemplos 
—espedalmente en la programacion 
de juegos— en que resulta muy ade- 
cuado disponer de programas de este 
tipo. Si no se pudiera disponer de un 
ordenador, el dibujo de este tipo de 
trayectorias seria extraordinariamente 
tedioso y plagado de errores, Sin em¬ 
bargo, con solo unas cuantas tineas de 
programa, puedes hacer que tu micro 
realice con precision la gran cantidad 
de calculos necesarios para contar con 
resultados sorprendentes. 

La forma en que se mueven los ob- 
jetos puede depender de vari.os facto- 
res, siendo importante que en un pro¬ 
grama de accion se tengan en cuenta 
al menos algunos de ellos para conse- 
guir un aceptable efecto de realismo. 

Un caso importante muy especial es 
el de un objeto que abandons la $u- 
perficie de la Tierra y esta sometido a 
la ley de la gravedad, En este articulo 
veremos la manera de programar el 
movimiento de los proyectiles. enten- 
diendo como tales los objetos que se 
mueven con velocidad horizontal 
constante (despreciando el rozamien- 
to del aire) y verticalmente sometidos 
unicamente a la accion de la gravedad. 

L_j* 

Una de las razones de por que son 
tan comunes los juegos de combates 
que se desarrollan en el espacio, no 
sometidos a caida libre, es que en ei 
espado se pueden ignorar los efectos 
de la gravedad y del rozamiento de! 
aire sobre el movimiento, tamo de los 
vehfculos espaciales como de los pro¬ 


yectiles. Esto no quiere decir que en 
el espacio libre no exista fuerza gravi- 
tacional; claro que existe, lo que ocu- 
rie es que sus efectos son normalmen- 
te tan pequehos que se pueden igno¬ 
rar dentro de un margen razenable de 
aproximacidn, o que se puede supo- 
ner que todos los objetos se ven afec- 
tados por un mismo campo gravitate- 
rio. 

En contraste con lo anterior, las ba- 
tallas sobre la Tierra que implican el 
lanzamiento de proyectiles, han de te- 
ner en euenta la gravedad y con fre- 
cuencia tambien la resistencia del aire 
y la accion del viento. Aparte de los 
uegos de tipo militar, hay otros mu- 
chos ejemplos en los que un conoci- 
miento del movimiento de ios proyec¬ 
tiles resulta esencial para una progra- 
macidn reaiisia, Entre dichos ejem- 
plos se encuentran muchos deportes y 
simulaciones de tipo atletico, inclu- 
yendo el lanzamiento de pelotas, bu- 
ceadores, flechas y todo tipo de saltos. 

Todos los proyectiles de estos ejern- 
plos (ya se trate de personas o cosas) 
tienen una cosa en comun: la trayec¬ 
toria descrita responde a una fam ilia 
de curvas conocidas como parabolas, 
No es dificil escribir un programa que 
simule el movimiento segiin una tra¬ 
yectoria parabolica; para ello no se re- 
quiere mas que un entendimiento de 
las fuerzas que originan el movimien¬ 
to v el uso de un poco de matematicas 
elementales. 

Por ejcmplo, basta con saber que el 
movimiento de un balon al que se le 
da un puntapie, consiste en la combi- 
nacion de dos movimientos en dos di- 
recciones distintas, para poder abor- 
dar y resolver el problema de la pro¬ 
gram acid n de este movimiento. Una 
de estas direcciones es la del eje hori¬ 
zontal o eje X, La otra direction es la 
del eje vertical o eje Y. A traves de 
todo este articulo se supone que un 
proyectil se mueve a velocidad cons¬ 


tante en la direccidn del eje X. En rea- 
iidad un objeto real se veria frenado 
por la accion de la resistencia dei aire, 
pero esto es una complicacidn que es 
mejor evitar en general salvo en los 
trabajos de gran precision. 


MOVIMIENTO HORIZONTAL 


Tedea el siguiente programa para 
simular el movimiento horizontal, 
pero no confundas «1» con «1», 

100 BORDER 7: PAPER 7: INK 
0: CLS 

105 POKE 23658,8 
110 PRINT INVERSE 1;AT 2,12 
;" MENU n 
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Dicha rutina utiliza un buck FOR 
... NEXT (li'neas 1040 a 1200) que te 
permite Lmzar un objeto horizontal- 
mente a seis velocidades distintas. La 
primera vez que se recorre el bucle, se 
elige automaticamente una veiocidad 
de 30 metros por segundo (m/s), la 
cual se Simula como una serie de pun- 
tos a lo largo de una b'nea recta. 

Despues de que se ha hecho la pri- 
niera pasada del bucle, el programa te 
invita a teciear un nuevo valor para la 
veiocidad, pero puedes salir del bucle 
tecleando un 0 cuando el programa se 
ejecute de nuevo y presente cl menu. 


120 PRINT AT 6,5;"1 

M0VIMIENT0 HORIZONTAL" 
130 PRINT AT 8,5;"2 

MOVIMIENTO VERTICAL" 

140 PRINT AT 10,5;"3 

HOVIMIENTO C0MBINAD0 " 

150 PRINT AT 12,5;"4 
ELEVACI0N" 

200 LET I$=INKEY$: IF 1$="" 
THEN GO TO 200 
205 IF I$<"V' OR I$>”4" THEN 
GO TO 200 

210 GO SUB VAL I$*1000 
220 RUN 
1000 CLS 
1020 LET SP=30 
1030 PRINT "VEIOCIDAD 
HORIZONTAL M/S" 

1040 FOR R=124 TO 28 STEP - 
16 

1045 LET T=D 

1050 PRINT AT 21-CR/8),0;SP 
1060 INPUT "PULSA ENTER PARA 
DISPARAR", LINE Z$ 

1090 LET X=SP*T: LET T=T+1 
1100 PLOT 30+X,R: BEEP .1,R/4 
1110 PAUSE 10 

1120 IF 30+SP*T<250 THEN JS0 
TO 1090 


1150 IF R=28 THEN GO TO 1200 
1160 INPUT "NUEVA VEL0CIDAD 
(0 TERMINAR)", LINE 1$ 
1165 LET SP=VAL 1$ 

1170 IF SP<0 OR SP>10Q0 THEN 
GO TO 1160 

1190 IF SP=0 THEN LET R=28 
1200 NEXT R 
1210 RETURN 

A1 ejecutar el programa te encuen- 
tras con un menu de cuatro opciones. 
De momento solo tienes tecleada la 
rutina correspondiente a la primera 
opcion, por lo que si pulsas 2, 3 o 4 te 
aparecera un mensaje de error. A1 te¬ 
ciear 1, el programa salta a la rutina 
que comienza en la Imea 1000. 


Teclea un valor, por ejemplo 60, y 
pulsa | ENTER | de nuevo para dispa- 
rar. Puedes acelcrar la accion pulsan- 
do repetidainente o manteniendo pul- 
sad a esta ted a. Compara a bora el re- 
sultado con la Hnea de los 30 m/s. In¬ 
troduce otros cinco valores de la veio¬ 
cidad, tras de lo cual la pantalla vol- 
vera a presentar el menu. 

La section de programa que se ocu- 
pa de dibujar los puntos, se extiende 
entre las li'neas 1090 y 1120. La varia¬ 
ble T Simula e! tiempo, que en este 
caso aumenta en pasos de un segun¬ 
do, de forma que los puntos quedan 
regularmente espaciados en la direc¬ 
tion horizontal (eje X), lo cual es ne- 
cesario por ser la veiocidad constantc. 
La separation real de los puntos se de¬ 
fine por medio del termino SP*T de la 
b'nea 1090. Este termino asegura que 
cuanto mayor es la veiocidad (SP), 
mayor es la separation entre puntos. 

Puede que ya te hayas dado cuenta 
de que SP*T forma parte de la cono- 
cida formula Espacio = Veiocidad x 
Tiempo, que se estudia en ffsica ele¬ 
mental. A partir de aquf. result a claro 


INPUT 19 





















2105 IF H>=0 THEN PLOT R*8+ 
4,H+32: BEEP .05,H/4; 
PAUSE 40: NEXT T 
2110 IF R>15 THEN 60 TO 2180 


que el programa dibuja distances (el 
espaciado entre puntos) para simular 
la velocidad. 


MOVIMIENTO VERTICAL 


Teclea ahora las siguientes Imeas. 
que te proporcionaran una rutina para 
simular el movimiento en la direccion 
vertical: 

2000 CLS 

2020 LET 6=10: LET SP=50 
2030 PRINT "ACELERACION GRA 
.M/S/S..." 

2040 FOR R=3 TO 18 STEP 3 
2050 PRINT AT 20,R;AT 21 
,R;G 

2060 INPUT "PULSA ENTER PARA 
DISPARAR", LINE 1$ 

2080 FOR T=0 TO 250 STEP .5 
2090 LET H=SP*T-0.5*6*T*T 
2100 IF H>=143 THEN BEEP . 
05,10: PAUSE 50: NEXT T 
; GO TO 2110 


verticalmente sobre la pantalla. Date 
cuenta no obstante de que Ios puntos 
no estan regularmente espaciados, 
sino que se encuentran mas agrupados 
cerca de la parte alta. 

Esto se debe a que el movimiento 
del objeto se encuentra retardado por 
la accion de La gravedad. En esta oca- 
sion el sonido te ayuda a explicar lo 
que esta sucediendo. A medida que el 
objeto asciende, el tono del sonido se 
va elevando, mientras que cuando 
cae, su tono se va haciendo mas bajo. 

Igual que antes, la rutina te permi- 
te seis pruebas (linea 2040) con intro- 
duccion de diferentes valores para 
apreciar el efecto de la gravedad. Esta 
es la mision de la variable G, euyo va¬ 
lor se pone inicialmente a 10 (linea 
2020) y se utiliza en la linea 2090. 
Esta relacion es la contenida en la 
de un objeto que cae someti- 
do a la accion de la gravedad. Su for- 


2140 INPUT "NUEVA 6 (0 PARA 
TERMINAR)", LINE 1$ 

2142 IF LEN I$=0 THEN GO TO 
2140 

2145 LET G=VAL 1$ 

2150 IF NOT (LEN I$>0 AND G> 
=0 AND G<400) THEN GO 
TO 2140 

2170 IF G=0 THEN LET R=18 
2180 NEXT R 
2190 RETURN 


Haz correr el programa, tecleando 
ahora un 2 para seleccionar la segun- 
da opcion del menu. Pulsa | ENTER I y 


veras una serie de puntos dibujados 
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ma usual es s = l/2gt", donde s es cl 
espacio recorrido (en este caso H), r 
el tiempo y g el valor de la aceleracion 
de la gravedad (G). Observa que en 
la Ifnea 2090 se ha escrito T*T en lu- 
gar de T , ya que los ordenadores ha- 
cen con mas rapidez la multiplication 
que la elevacidn a potencias. 

La aceleracion de un objeto es una 
medida de lo que cambia su velocidad 
con el paso del tiempo. Cerca de la su- 
perficie de la Tierra, g tiene un valor 
aproximadamente igual a 10 m/s/s. 
Esto significa que la velocidad de un 
cuerpo que cae aumenta a razdn de 10 
m/s en cada segundo. Se trata de una 
aceleracion negativa, ya que la h'nea 
2090 contiene un signo menos (en lu- 
gar del signo mas que aparece en la 
formula usual). 

La expresion de g suele utilizarse 
habitualmente en relacion con los via- 
jes espaciales. Por ejemplo. la acele¬ 
racion de un vehi'culo espacial tripula- 
do que se lanza para entrar en orbita 
es prdxima a los 10 g. Esto significa 
que dicho vehi'culo espacial aumenta 
su velocidad a razon de 10*10 m/s/s, 
es decir-100 m/s 2 , En un posterior ar- 
tlculo nos ocuparemos con mayor de- 
talle del tema de las orbitas. 

La primera vez que se recorre e! bu- 
cle que empieza en la Ifnea 2040, se di- 
bujan las posiciones del objeto a inter¬ 
vals de un segundo. La velocidad ini- 
cial es de 50 metros por segundo y el 
valor de G es de 10 m/s 2 ; ambos valo- 
res se establecen en la h'nea 2020. 
Igual que en la rutina anterior, pue- 
des acelerar la accion manteniendo 


pulsada o pulsando repetidamente 
| enter | . Puedes cambiar entonces el 
valor de G, cuando te lo indique el 
mensaje de pantalla, y comparar el 
efecto de seis valores diferentes. An¬ 
tes de que se complete el bucle, pue¬ 
des salirte de el introduciendo un 0 
cuando el programs retorna al menu. 


MOVIMIEIMTOS COMBINADOS 


Para simular el movimiemo de un 
proyectil, solo tienes que combinar es- 
tas rutinas de forma que el objeto se 
mueva al mismo tiempo en las dos di- 
recciones, horizontal y vertical. Teclea 


progromocio'’ 


las siguientes h'neas, y tendras la ter- 
cera rutina: 

3000 CLS 

3020 LET S=10: LET SP=50 
3030 FOR R=1 TO 6 
3040 PRINT AT 0,0;"G=";G;"M 
/S/S" 1 "VELOCIDAD ";SP; 
"M/S " 

3050 INPUT "PULSA ENTER PARA 
DISPARAR", LINE 1$ 

3070 FOR T=0 TO 250 STEP .5 
3080 LET H=SP*SIN ((PI/180) 
*45)*T~.5*G*T*T 
3090 LET X=SP*C0S ((PI/180)* 
45) *T 

3100 IF H<175 AND X<255 THEN 
GO TO 3105 

3102 IF H>0 THEN BEEP .05, 
10: PAUSE 25: NEXT T: 

GO TO 3110 

3103 LET T=25Q: NEXT T: GO 
TO 3110 

3105 IF H>=0 THEN PLOT X,H 
: BEEP .05,H/4: PAUSE 
40: NEXT T: GO TO 3110 

3106 LET T=25Q: NEXT T 

3110 IF R=6 THEN GO TO 3230 
3120 PAUSE 50 

3140 INPUT "NUEVA G(D PARA 
TERMINAR)", LINE 1$ 

3150 IF LEN I$=0 THEN GO TO 
3140 

3155 LET G=VAI_ 1$ 

3160 IF NOT (LEN I$>0 AND G> 
=0 AND GC1Q00) THEN GO 
TO 3140 

3170 IF 6=0 THEN LET R=6: 

GO TO 3230 

3190 INPUT "NUEVA VELOCIDAD" 
, LINE IS 

3195 LET SP=VAL 1$ 

3200 IF NOT (LEN I$>0 AND SP 
>0 AND SPC1000) THEN 
GO TO 3190 
3230 NEXT R 
3240 RETURN 


Ejecuta el programa, tecleando un 
3 eomo respuesta al mensaje de pan¬ 
talla, seleccionando asf la tercera op- 
cion. Cuando pulses CENTER1 , van 


apareciendo puntos en una curva que 
arranca en la parte inferior izquierda 
de la pantalla y termina en algiin pun- 


to de la parte inferior derecha. Esta es 
la trayectoria de un objeto disparado 
a una velocidad de 50 m/s con un va¬ 
lor de la gravedad de 10 m/s 2 . 

La estructura de la rutina es analo¬ 
gs a las de las dos anteriores. Las sec- 
ciones encargadas del calculo y del di- 
bujoestan en un bucle FOR ... NEXT 
{h'neas 3030 a 3230), que te permite 
hacer una comparacion de seis trayec- 
torias posibles, cinco de las cuales son 
especificadas por ti. Al igual que en 
las pruebas anteriores, puedes salirte 
de la rutina tecleando un 0 para vol- 
ver a! menu. Sin embargo es mas pro¬ 
bable que quieras introducir un nuevo 
juego de valores para comparaT las 
trayectorias, 

Teclea un valor de 5 para G, man- 
teniendo el valor de SP en 50, y a con- 
tinuacion pulsa enter para dispa- 
rar. Esta vez el objeto se movera con 
mayor rapidez y liegara mas lejos. 
Manten ahora el valor de G a 5, pero 
reduciendo SP a 25 y compara los re- 
sultados, Continua la experimentation 
cambiando G y SP. escuchando los so- 
nidos, para ayudarte a entender el mo- 
vimiento del objeto cuando desapare- 
ce de la pantalla. Una nota cuya altu- 
ra aumenta indica que el objeto esta 
subiendo, mientras que cuando el 
tono baja, indica que el objeto esta ca- 
yendo. 


FUNCIONAMIENTO 


Recuerda que la trayectoria del ob¬ 
jeto se dibuja con coordenadas H en 
la direction del eje Y, y coordenadas 
X en la direccion del eje X. Estas dos 
coordenadas se calculan en las llneas 
3080 y 3090. La unica diferencia es 
que aqul la coordenada H contiene la 
velocidad (SP) multiplicada por el 
seno de un angulo, y la coordenada X 
contiene la SP multiplicada por el co- 
seno de ese mismo angulo (45°). Esto 
explica porque cuando G es pequeno 
y SP es grande, la trayectoria aparen- 
te es una Ifnea diagonal a 45°. 

La razon por la que se emplean es¬ 
tas funciones trigonometricas es el cal¬ 
culo de la fraccion del movimiento del 
objeto que corresponde a cada una de 
las dos direcciones: vertical y horizon- 
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tal. A estas fracciones se les llama las 
componentes. Si por ejemplo la velo- 
cidad inicial del objeto es 50 m/s, las 
componentes horizontal y vertical son 
menores que 50, si bien su suma da 
exactamente 50 m/s. 

No te equivocaras si recuerdas que 
la componente vertical es SP^SIN A y 
la componente horizontal es SP*COS 
A. La variable A es el angulo de ele¬ 
vation del canon, el arco o lo que sea. 

Para entender como se liega a la ob- 
tencion de estos valores, te sera de 
gran ayuda una figura, La segunda 
ilustracidn de este artfculo muestra un 
proyectil que inicia su movimiento con 
una veiocidad real V y un angulo A 
con la horizontal. Las Ifneas de pun- 
tos muestran los componentes de la 
veiocidad (Vh y Vx) en las dos direc- 
ciones. El seno del angulo A es Vh/V, 
relacion que puede escribirse de for¬ 
ma equivalente como Vh = V*SIN A. 
Analogamente, el coseno de A es 
Vx/V, to que es equivalente a escribir 
Vx = V*COS A. 

Siguiendo con esta misma idea en 
nuestro programa, necesitas calcular 
SP*SIN 45 para la componente verti¬ 
cal de la veiocidad y SP*CO$ 45 para 
la componente horizontal. 


CAMBIO DE ANGULO 


Llegados a este punto, puede que te 
extrane el por que ha de fijarse el va¬ 
lor del dngulo en 45°, ya que elio limi- 
ta el alcance del proyectil. Tanto el an¬ 
gulo de elevacidn como la veiocidad 
inicial pueden modificarse para cam- 
biar el alcance de los proyectiles. Y es 
mas corriente modificar unicamente el 
angulo para cambiar la distancia. man- 
teniendo constante la veiocidad ini¬ 
cial. Esto es preeisamente lo que hace 
la siguiente rutina: 

4000 CLS 
4010 LET FL=0 

4020 RESTORE : FOR N=0 TO 7: 
READ A: POKE USR "A''+N, 
A: NEXT N 

4040 LET A=70: LET SP=50 
4060 PRINT AT 0,0; ''ANGUL0=''; 
A;CHR$ 144;CHR$ 32 


4070 INPUT "PULSA ENTER PARA 
DISPARAR", LINE 1$ 

4080 FOR T=0 TO 250 STEP .5 

4090 LET H=SP*SIN ((PI/180)* 
A)*T-.5*10*T*T: LET X= 
50*COS C(PI/180)*A)*T: 

4100 IF H>=0 THEN PLOT X,H 
+16: BEEP .05,H/4: 

PAUSE 40: NEXT T: GO TO 
4110 

4105 LET T=250: NEXT T 

4110 PAUSE 50 

4130 INPUT "NUEVO ANGUL0C0 

PARA TERMINAR)", LINE 1$ 

4135 IF LEN I$=0 THEN GO TO 
4130 

4140 LET A=VAL 1$ 

4150 IF NOT (LEN I$>0 AND A> 
=0 AND A<90) THEN GO TO 
4130 

4160 IF A=0 THEN LET FL=1 

4170 IF NOT FL THEN GO TO 
4060 

4180 RETURN 

5000 DATA 24,36,36,36,24,0, 

0,0 


A1 ejecutar la cuarta opcion, veras 
la trayectoria seguida por un objeto 
lanzado con una veiocidad de 50 m/s 
y con un angulo de elevacion de 70° 
(ambos valores se establecen en la If- 
nea 4040 y se utilizan en las relaciones 
de la Iinea 4090). 

I ista rutina funciona igual que la an¬ 
terior. si bien aqui puedes introducir 
los valores de los angulos que quieras 
sin tener que volver al menu. El an¬ 
gulo ha de estar comprendido entre 1° 
y 89°. Asf, cada vez que ejeeutes la ru¬ 
tina, se le asigna un valor a la varia¬ 
ble A de la lfnea 4090. correspondien- 
te al angulo que hayas tecleado. Esta 
vez la rutina contiene un buck infini- 
to, por !o que la pantalla no retornara 
al menu a menos que introduzcas 0 
como valor del angulo. 

Utilizando esta rutina. trata de en- 
contrar cl angulo con el que se obtie- 
ne el mayor alcance, es decir el que 
permite que el objeto llegue mas lejos 
en direction horizontal. Facilmente 
descubriras qne este angulo es de 45 
grados. 

Casi todo el mundo conoce este re- 
sultado de forma intuitiva o a partir de 
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su propia experiencia, pero lo que ya 
es menos conocido es que en la prac- 
tica la resistencia del aire hace que 
haya una diferencia significativa en el 
resultado en muchos casos, y que el 
valor de 45 grados solo permite obte- 
ner el alcance maximo cuando los pun- 
tos de partida y de cafda estan a la mis¬ 
ma altura. Sin embargo, cualquier jue- 
go de proyectiles que dependa solo de 
que el jugador obtenga el mayor al¬ 
cance, esta condenado al fracaso, ya 
que no se producira una variacion sus- 
tancial respecto al caso ideal que la 
mayorfa de los jugadores conocen o 
sospechan. En un artfculo posterior 
veremos la forma en que pueden uti- 
lizarse estas rutinas como base para un 
desafiante v cautivador juego. 
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En el sorteo correspondiente al numero 11 entre quienes escribisteis mandando vuestros votes a LOS 
MEJORES DE INPUT ban resultado ganadores: 


NOMBRE 

LOCAL! DAD 

JUEGO ELEGIDO 

J. Ignacio Girde Basterrechea 

Madrid 

Movie 

Miguel Gdmez Bataller 

Valencia 

Vay of the tiger 

Jesus Pelegrin Plazas 

Lorca (Murcia) 

Phantomas 

Jorge Dieznandino 

Algorta (Vizcaya) 

Profanation 

Jorge Gutierrez Repiso 

Malaga 

Kung fu master 

Fernando Fanes Trillo 

Barcelona 

Green Beret 

Angel Fabian Brea Rodriguez 

Chiclana (CSdiz) 

Ping Pong 

Joan Grau Burgues 

Lerida 

Winter Games 

Alberto Redondo Gonzalez 

Madrid 

Back to the future 

Martin Qffmann 

Tarragona 

Phantomas 
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PONIENDO LAS COSAS 

EN ORDEN 



progr° 


■ 

iQUE ES LA ORDENACION? 

■ 

EL METODO DE LA BURBUJA 

■ 

LOS MODULOS DE SHELL Y 


SHELL-METZNER 

■ 

MEJORA DE LA VELOCIDAD 



Todo programs que tenga que ma- 
nejar datos, puede beneficiarse del uso 
de una rutina de ordenadon del tipo 
que sea. \quj nos ocuparemos de tres 
de Ins metodos de ordenadon mas co¬ 
ni unes* 

! j ordenadon es uno de I os aspec- 
tits mas baMcns del proceso de la in- 
t'ormaann. Los ordenadores son muy 
hucnos para la manipulacion de dates 
eon gran rupidez y la ordenadon jue- 
ga un pa pel muy import ante a I hacer 
que esta mlormadon sea facilmente 


accesibie para su inspection y correc¬ 
tion, 

Imaginate lo diffcil que seria seguir^ 
le ia pista a cuaiquier voz en particu¬ 
lar dentro de un libro si este no tuvie- 
ra tndice. O consultar un numero de 
telefono en una gufa que no estuviera 
ordenada alfabeticamente. Ambasson 
listas esendales de information que, a 
diferencia de las enrradas aleatorias de 
algo en una lista de la compra, contie- 
nen sus elememos ordenados siguien- 
do un determinado criteria, en este 
caso el alfabetico, Pero tarnbien po~ 


drfas fijar tu atencion en una lista de 
elememos ordenados numericamente, 
como por ejemplo ias emradas de che¬ 
ques en una sucursal bancaria. 

Hay muchos tipos de program as en 
los que se utiiizan rutinas de ordena- 
cion; tarnbien ocurre esto en los jue- 
gos en los que se hace la ciasificacidn 
con arreglo a una puntuacion. 

Pero es mas corriente encontrar ru¬ 
tinas de ordenadon en los programas 
han de manejar la informacion en lis¬ 
tas, tales como listas de direceiones, 
dates person ales. etc. 

IHHBhI 
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^QUE ES LA ORDENACION? 


Se Hama ordenacion o clasificacion 
simplemente a colocar la information 
en un arden especifieado, tal como se 
hace euando se abre en abanico un 
grupo de cartas y se van poniendo por 
orden de numeros y palos, 

En las ordenaciones de tipo nume- 
rico, aparecen sucesivamente valores 
mayores antes o despues que valores 
mas pequenos. En las de tipo alfabe- 
tico, aparecen letras mas prdximas a! 
comienzo del alfabeto antes o despues 
que otras letras m5s lejanas. Tambien 
puedes basar una ordenacion en un 
criterio alfanumerico, en el que se 
consideran letras y numeros, aunque 
siempre debe prevalecer uno de am- 
bos elementos sobre el otro; normal- 


men te las letras tienen mas prioridad 
que los numeros. 

En las ordenaciones numericas, el 
valor 1 es el que tiene usualmente la 
maxima prioridad, mieotras que en las 
alfabeticas es la A el elemento de ma¬ 
xima prioridad. Pero para determina- 
dos fines, estos criterios pueden eam- 
biarse, asignando por ejempio al valor 
9 y a la letra Z la maxima prioridad. 


ORDENACION POR EL METODO 
DE LA BURBUJA 


La forma mas sencilla de rutina de 
ordenacion conocida se suele llamar 
ordenacidn por el metodo de la bur- 
buja. Examinemos ahora el proceso 
con detaile, Utiliza como ejercicio 
unos cuanlos naipes, o corta y numera 
unos cuantos trozos de papel. 


Coloca esta selection de cartas en 
una mesa por este orden, con el «tres» 
en la posicion mas alejada de ti: 

ULTIMO [TRES] 

CS1ETF3 
[ DOS J 
CSEISD 

PRIMERO rD 3 e73 

En el metodo de ordenacion de la 
burbuja, el primer valor —en este 
caso la carta numero 10— se compara 
con la que figura a continuacion de 
ella en la lista, permutandolas euando 
la siguiente es de menor valor (como 
ocurre en este caso). El 10 se compa¬ 
ra entonees con el 2, con el 7 y con el 
3. Todas las veces se permuta el 10 con 
las que se va encontrando, debido a 
que siempre es el mayor de los dos va¬ 
lores que se comparan. 
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De hecho el 10. quc es el mayor va¬ 
lor en todas las comparaciones reali- 
zadas, ha «burbujeado» a traves de los 
restantes valores, lo que explica el 
nombre por el que se conoce popular- 
mente a esta rutin a de ordenacion. 
Por la misma razon. los valores mas 
pequenos burbujean hacia abajo. Esta 
ordenacidn de la burbuja se suele Ha- 
mar ordenacion por cambio u ordena¬ 
cion por intercambio, 

Asi, despues de una pasada. la fila 
de cartas quedarfa de La siguiente for¬ 
ma: 

ULTIMO CDIEZ] 

CTRES] 

CSIETE] 

[DOS] 

PRIMERO [SEIS] 

El proceso comienza de nuevo aho- 


O/ 

ra con la siguiente «primera» carta, 
que es el 6, el cual se compara con el 
2 y se permuta debido a que es ma¬ 
yor. Pero la siguiente comparacion se 
hace con el 7. Ahora, como 7 es ma¬ 
yor. la ordenacion continua con el 7. 
dejando el 6 en la ultima posicidn en 
la que obtuvo una comparacidn con 
ventaja. La carta numero 7 se compa¬ 
ra primero con el 3 y despues con el 
10, desplazandose hacia arriba imica- 
mente un lugar, debido a que se en- 
cuentra con un vaior mayor que el 
suyo. E! nuevo orden de las cartas es 
ahora el siguiente: 

ULTIMO CDIEZ] 

CSIETED 

CTRES] 

[SEIS] 

PRIMERO [DOS] 


La nueva primera carta, el 2. se 
compara ahora con su vecina, el 6. La 
carta numero 6 es la que prevalece 
ahora por ser mayor, permutandose 
con la numero 3, pero ya no puede lle- 
gar mas lejos al compararse con ia car¬ 
ta numero 7. La ordenacion llega en- 
tonces a su fin al no poder producirse 
mas intercambios, con lo que el orden 
final de las cartas queda de la siguien¬ 
te manera: 

ULTIMO CDIEZ] 

CSIETE] 

CSEIS] 

CTRES] 

PRIMERO [DOS] 

Un ordenador realizaria de hecho 
una ultima pasada por esta Ultima se- 
rie ordenada. para ver si hay algun par 
mas que admita un intercambio. dete- 
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niendose unicamente a] no poder ha- 
cer ninguno mas, 

En el curso de una ordenacion por 
burbuja, se produce un determinado 
numero de comparaciones e intercam* 
bios. Estas dos operaciones diferentes 
forman parte de tod a rutina de orde- 
naeibn, y la diferencia entre unas ru- 
tinas y otras depende enteramente del 
numero de estas operaciones y del 
tiempo requerido. 

Veamos un ejemplo utilizando la si- 
guiente sucesion de numeros: 

ARRIBA: ABAJO: 

67 35 72 19 47 38 11 96 

E! primero de esta lista (arriba) es 
el 67, Este valor se compara con 35 y 
se intercambia con el. pero ya no se 
mueve mas, El valor mayor que inter- 
viene en las comparaciones es ahora 
72, se compara y se va permutando 
con 19, 47, 38 y 11 hasta que se en- 
cuentra con 96, momenta en que la ru¬ 
tina vuelve al principio comenzando 
con su nuevo primer numero. En la ta- 
bb 1 se muestra el proceso paso a 
paso, se presentan encerrados entre 
parentesis los elementos que van stem 
do sometidos a comparacton. Si en la 
fila siguipnte aparece un numero dife- 
rente en esa misma columna, es que 
se ha producido un intercambio. 


^C6mo seria entonces un programa 
de ordenacion por el metodo de la 
burbuja? Ensava el siguiente progra¬ 
ma en el que la rutina de ordenacion 
de la burbuja ocupa la subrutina que 
empieza en la tinea 1000. Almacena el 
programa, al que podras ariadir des¬ 
pues otras rutinas de ordenacion. 


Teclea 


10 POKE 23658,8: LET T=0: 
IMPUT "NUMERO DE C0NCEPT0S 
AA: IF AA<2 THEN GO TO 

10 

15 DIM A<AA> 

20 PRINT "TABLA DES0RDENADA" 

: PRINT 

30 FOR Z=1 TO AA 
40 LET A(Z)=INT CRND*100)+1 
50 PRINT TAB 7;ACZ);: LET T= 
T+4: IF T>30 THEN LET 
T=0 

60 NEXT Z 

70 PRINT : PRINT : PRINT 
"PULSA 0 PARA 0RDENAR" 

80 LET K$=INKEY$; IF ^<>"0" 
THEN GO TO 80 
90 GO SUB 1000 
100 PRINT : PRINT "TABLA 
0RDENADA": PRINT 
110 LET T=0: FOR Z=1 TO AA 
120 PRINT TAB T;A(Z);: LET T 


=T+4: IF T>30 THEN LET 
T=0 

130 NEXT Z 
140 GO TO 10 

999 REM METODO DE BURBUJA 

1000 FOR Z=1 TO AA-1 
1010 LET ZZ=0 

1020 FOR Y=1 TO AA-Z 
1030 IF ACY+1XACY) THEN LET 
X=A(Y): LET A(Y)=A(Y+1) 

: LET A(Y+1)=X: LET 22=1 
1040 NEXT Y 

1050 IF ZZ=0 THEN RETURN 
1060 NEXT Z: RETURN 


Teclea RUN para ejecutar el pro¬ 
grama. Empieza pregun tan dote cuan- 
tos elementos quieres ordenar, erean- 
do un conjunto de numeros pseudoa- 
leatorios basado en tu respuesta. Es- 
tos numeros se presentan en la panta- 
Ila bajo el encabezamiento «Tabla sin 
ordenar». A continuacion aparece un 
mensaje preguntandote si estas dis- 
puesto para empezar la ordenacion. 
Para empezar no tienes mas que te- 
clear «C». 

Se produce entonces la ordenacion. 
Con unos pocos elementos puede que 
no tarde mas que un segundo o poco 
mas, pero prueba a contestar al men¬ 
saje de apertura con el numero 50. por 
ejemplo. Una vez que se haya com- 


TAELA 1 Arriba 


(67) 

(35) 

72 

19 

47 

35 

(67) 

(72) 

19 

47 

35 

67 

(72) 

(19) 

47 

35 

67 

19 

(72) 

(47) 

35 

67 

19 

47 

(72) 

35 

67 

19 

47 

38 

35 

67 

19 

47 

38 

(35) 

(67) 

19 

47 

38 

35 

(67) 

(19) 

47 

38 

35 

19 

(67) 

(47) 

38 

35 

19 

47 

(67) 

(38) 

35 

19 

47 

38 

(67) 

35 

19 

47 

38 

11 

35 

19 

47 

38 

11 

(35) 

(19) 

47 

38 

11 

19 

(35) 

(47) 

38 

11 

19 

35 

(47) 

(38) 

11 

19 

35 

38 

(47) 

(11) 

19 

35 

38 

11 

(47) 


Abajo Arriba 


38 

11 

96 

19 

35 

38 

11 

96 

19 

35 

38 

11 

96 

(19) 

(35) 

38 

11 

96 

19 

(35) 

(38) 

11 

96 

19 

35 

(72) 

(11) 

96 

19 

35 

11 

(72) 

(96) j 

19 

35 

11 

72 

96 | 

19 

35 

11 

72 

96 

19 

35 

11 

72 

96 i 

(19) 

(35) 

11 

72 

96 

19 

(35) 

(11) 

72 

96 

19 

11 

(67) 

(72) 

96 

19 

11 

67 

(72) 

(96) i 

19 

11 

67 

72 

96 

19 

11 

67 

72 

96 

19 

11 

67 

72 

96 

(19) 

(11) 

67 

72 

96 

11 

19 

(67) 

72 

96 




Aba j o 


38 

11 

47 

(67) 

(72) 

96 

38 

11 

47 

67 

(72) 

(96) 

38 

11 

47 

67 

72 

96 

(38) 

11 

47 

67 

72 

96 

(38) 

(11) 

47 

67 

72 

96 

11 

(38) 

(47) 

67 

72 

96 

11 

38 

(47) 

(67) 

72 

96 

11 

38 

47 

(67) 

(72) 

96 

11 

38 

47 

67 

(72) 

(96) 

11 

38 

47 

67 

72 

96 

(11) 

38 

47 

67 

72 

96 

(35) 

(38) 

47 

67 

72 

96 

35 

(38) 

(47) 

67 

72 

96 

35 

38 

(47) 

(67) 

72 

96 

35 

38 

47 

(67) 

(72) 

96 

35 

38 

47 

67 

(72) 

(96) 

35 

38 

47 

67 

72 

96 

35 

38 

47 

67 

72 

96 
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pletado el proceso de ordenacion. so 
presentara el nuevo grupo de numeros 
junto a los otros, 

Para poder comparar unos mdtodos 
con otros, es util tomar ei tiempo re- 
querido por el proceso de ordenacion. 
El eronometraje es algo que puede ha- 
cer muy bien el ordenador por ti'. In- 


La veioeidad de todas ias ru- 
tioas de ordenacion puede au- 
mentarse considerableinente si 
la information se presenta ya de 
alguna forma parcialmeute or- 
denada, Esto es especialmente 
cierto en el caso sencillo de la 
ordenacion por el metodo de ta 
burbuja, 

Por ejempio, si los elementos 
tienen que ser ordenados por or- 
den de fechas, sera muy util in¬ 
troduce los datos en la forma 
Afio/Mes/DCa en vez de la forma 
mas usual Dia/Mes/Ano. La ru¬ 
tina podria ocuparse de los anos 
con mucha rapidez, para gene- 
rar una primera lista ordenada 
por anos, Esta lista puede orde- 
narse ahora por tmeses dentro de 
cada ano, Finalmente, se puede 
poner orden dentro de cada mes 
en ia parte que requiere mas 
pemuitaciones, que es la de los 
dias. 

Utilizando este metodo, la or- 
denacion se realiza primeramen- 
te dentro de todo ei grupo y a 
continuation en paries separa- 
das, En cualquiera de las fases, 
los elementos estan en cierta 
medida ordenados. 

El proceso anterior es mas ra- 
pido que 11amar a una rutina que 
vaya examinando y ordenando 
todos los dfas, despues reordene 
algunos de estos dias debido a la 
influencia de ios meses y por ul¬ 
timo realice una tercera ordena¬ 
cion debida a la influencia de los 
anos. 

Se podria utilizar una subruti- 
na adicional para convertir una 
secuencia de entrada «normal» 
en una secuencia de feehas «in- 
vertida» para llevar a cabo la or- 
denacion. 


programaejo" 



corpora esta rutina de temporizacion 
dentro del programa existeme: 


Teclea 


90 POKE 23672,0: POKE 23673 
,0: GO SUB 1000: PRINT : 
PRINT (PEEK 23672+256* 
PEEK 23673)/50; n 
SEGUND0S 11 

Para que empiece el proceso de me¬ 
dida de tiempos, y la rutina de orde¬ 
nacion, pulsa la tecla C cuando apa- 
rezca ei mensaje de comienzo. El 
tiempo transeurrido hasta el momen¬ 
ta en que se complete la rutina apare- 
ce en la pantalla y la ejecucidn del pro¬ 
grama arranca de nuevo automatica- 
mente. 

Aunque los tiempos de ordenacion 
son probablemente mucho mas rapi- 
dos que los que podrias lograr orde- 
nando tu directamente los numeros, 
para las magnitudes de tiempo que se 
tnanejan con los ordenadores se trata 
de un tiempo desesperadamente lar¬ 
go. Por esta razdn no se utilize nor- 
malmente dicha rutina en este estado 
tan «crudo» en los programas de pro¬ 
ceso de datos, a no ser que se trafe de 
listas muy cortas. 

Pero asombrosamente existe un 
ejempio en el que la rutina del meto¬ 
do de la burbuja proporciona real- 
mente los resultados mas rapidos. Se 
trata del caso en que se utilize para 
reordenar una lista ya ordenada en la 
que se ha agregado un nuevo elemen- 
to, 

Por ejempio en un programa de dri 
recciones postales, ias nuevas direc- 
ciones se ordenan separadamente y 
despues se mezclan con la lista vieja, 
Pero tambien se pueden ir ahadiendo 
direcciones de una en una a la lista vie¬ 
ja* sometiendo despues todo el lote a 
una nueva ordenacion, 

Bajo estas circunstancias, el meto¬ 
do de la burbuja no tiene que hacer 
nada mas que comparar la nueva di¬ 
rection con todos sus vecinos hasta 
que llegue a su position correcta, Y 
esto puede hacerse muy rapidamente. 
por lo que se utiliza much as veces con 
buen resultado dentro de rutinas de 
ordenacion de otro tipo. 



i*', it . < r“ - ' 


ORDENACION DE SHELL 


La llamada ordenacion dc Shell es 
una de las dos alternativas mas cono- 
cidas al metodo de la burbuja, las cua- 
les han de ser tomadas en considera¬ 
tion cuando el numero de elementos 
a ordenar pasa de unos diez. {Date 
cuenta que la comparacion de una 
nueva entrada unica con una lista ya 
ordenada. significa que hay que com¬ 
parar unicamente dos elementos). 

La ordenacion de Shell utiliza una 
tecnica de biisqueda binaria que ope¬ 
ra dividiendo sucesivamente cn mita- 
des la lista original no ordenada hasta 
que puede establecerse la position re- 
lativa del nuevo elemento introduci- 
do. En cada ocasidn interviene en la 
comparacion un nuevo par de valores 
hasta que se hace una nueva pasada 
sin permutaciones. 
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Un mddulo de ordenacion de Shell 
tiene la forma tfpica que se muestra a 
continuacion. Anadele esta subrutina 
a tu programa anterior, modificando 
el GOSUB que hay en la mitad de la 
linea 90 para pro bar! a: 


Tectea 


1999 REM METODO DE SHELL 

2000 LET Z=AA 

2010 IF Z<=1 THEN RETURN 
2020 LET Z=INT CZ/2): LET Y 
= AA~Z 

2030 LET ZZ=0 
2040 FOR X=1 TO Y 
2050 LET XX=X+Z 
2060 IF A(X)>A(XX) THEN LET 
YY=ACX): LET ACX) = A(XX) 

: LET A(XX)=YY: LET ZZ=1 
2070 NEXT X 

2080 IF ZZ>0 THEN GO TO 2030 
2090 GO TO 2010 


i,C6irio funciona este programa? La 
forma mas sencilla de ver lo que suce- 
de es analjzar un ejemplo en detalle. 
Imagmate que se te presents La si- 
guiente lista de numeros para su orde¬ 
nacion: 

ARRIBA: A8AJ0: 

67 35 72 19 47 38 11 96 

En la ordenacion de Shell, se divi¬ 
de la lista inidalmente en dos partes y 
se comparan los vaiores del primer 
elemento de cada uno de los grupos. 
Cuando el valor mas cercano al prin- 
cipio de la lista es mayor, se cfectua 
un intercambio. Al dividir en dos gru¬ 
pos se obtienen lo vaiores iniciales de 
67 y 47 que se comparan y se intercam- 
bian: 

ARRIBA: ABAJ0; 

47 35 72 19 : 67 38 11 96 


Despues de un cam bio, se compara 
el siguiente par de vaiores, que en este 
caso son 35 y 38. En este caso no se 
produce intercambio. A continuaeion 
se comparan 72 y 11, permutandose. 
Por ultimo sc comparan 19 y 96. La lis¬ 
ta queda asf: 

ARRIBA: ABAJ0: 

47 35 11 19 : 67 38 72 96 

En este punto cada una de las mi- 
tades se subdivide de nuevo: 

ARRIBA: ABAJ0: 

47 35:11 19:67 38:72 96 

El primer valor, que es 37, se com¬ 
para con el valor que figura en tercer 
lugar, el 11, intercambiandose con el. 
El 35, que figura en segundo lugar, se 
compara con el 19 que esta en cuarto 


INPUT 29 


























lugar, realizandose ana nueva permu¬ 
tation. El 35 queda ahora en ia cuarta 
position. El valor 47, que se ha some- 
tido con exito a una comparacion, se 
compara con 67, pero esta vez sin exi¬ 
to. El cuarto valor, que ahora es 35, 
se compara con 38 quedandose donde 
estaba. El quinto valor. 67, se compa¬ 
ra con el de la septima posicidn, que 
es el 72, quedartdo ambos donde esta- 
ban. El 38, que figura en sexta posi¬ 
cidn, se compara sin exito con 96. En 
la tabla 2 se muestra la secuencia. 
Como ocurria antes, se muestran en- 
tre parentesis los valores que intervie- 
nen en la comparacion; para saber si 
se ha producido o no un cambio, tie- 
nes que observar lo que ocurre en la 
linea siguiente. 

La lista sufre una nueva division 
para dar los siguientes grupos: 


ARRIBA: ABAJO: 

11:19:47:35:67:38:72:96 



TABLA 2 


L473 

35 

: [113 

19 : 67 

38 : 72 

96 

11 

L353 

: 47 

C193: 67 

38 : 72 

96 

11 

19 

: C473 

35 :C673 

38 : 72 

96 

11 

19 

: 47 

L353; 67 

[383: 72 

96 

11 

19 

: 47 

35 : [673 

38 :T723 

96 

11 

19 

: 47 

35 : 67 

L383: 72 

L963 

11 

19 

: 47 

35 : 67 

38 : 72 

96 


TABLA 3 L113:[193: 47 : 35 : 67 : 38 : 72 : 96 

11 :LI 93:[473: 35 : 67 : 38 : 72 : 96 

11 : 19 :L473:C353: 67 : 38 : 72 : 96 
11 : 19 : 35 :L473:C673; 38 : 72 : 96 
11 : 19 : 35 : 47 :L673:C383: 72 : 96 

11 : 19 : 35 : 47 : 38 :L673:L723: 96 


TABLA 4 L113:C193; 35 : 47 : 38 : 67 : 72 : 96 

11 :L193:L353: 47 : 38 : 67 : 72 : 96 

11 : 19 :[353:L473: 38 : 67 : 72 : 96 

11 : 19 : 35 : [473 :1383: 67 : 72 : 96 

11 : 19 : 35 : 38 :L473:C673: 72 : 96 


Los valores se comparan de nuevo. 
abriendose camino los valores mas ba- 
jos hacia el principio de la lista. Ob- 
serva que la rutina solamente compa¬ 
ra bloques adyacentes, El primero se 
compara con el segundo, el segundo 
con el tercero, y asi sucesivamente a 
lo largo de toda la lista. como se ob- 
serva en la tabla 3. 

La ordenacion continua hasta llegar 
a los valores finales que ya estan en or- 
den, volviendo de nuevo al principio, 
como se observa en la tabla 4. 

Aunque la lista ya estii ordenada, el 
programa realizara una nueva pasada. 
Cualquier valor nuevo puede entonces 
ser comparado con esta lista ordena¬ 
da de la misma forma que en el me- 
todo de la burbuja, ya que eso es esen- 
cialmente lo que se hace en cada com¬ 
paracion binaria. 


ORDENACION DE 
SHELL-METZNER 


La ordenacion por el metodo de 
Shell-Metzner utiliza una rutina de or- 
denacion binaria aun mas rapida, que 
se deriva del algoritmo de Shell; 


I lee lea 

1 



2999 

REM 

METODO 

SHELL-METZNER 

3000 

LET 

Z=AA 


3010 

LET 

Z=INT ( Z/2) 

3020 

IF 

Z=C THEN 

RETURN 

3030 

LEI 

Y=AA-Z: 

LET ZZ=1 

'3040 

LET 

■>< 

II 

ivg 


3050 

LET 

XX=X+Z 


3060 

IF 

A(XK=A(XX) THEN GO 


TO 

3G90 


3070 

LET 

W=A(X): 

LET A(X)=A 


(XX): LET A(XX)-W: LET 
X=X-Z 

3080 IF X>=1 THEN GO TO 3050 
3090 LET ZZ=ZZ+1 
3100 IF ZZ<=Y THEN GO TC 3040 
3110 GO TC 3010 

Ahade esta rutina a tu anterior pro¬ 
grama de demostracion, modificando 
la instruction GOSUB de la linea 90 
y pruebala. 

Como puedes ver, en comparacion 
con el mdtodo de la burbuja es extre- 
madamente rapida para el caso en que 
tengas cincuenta numeros aleatorios. 
Pero haz una prueba con con juntos de 
numeros realmente grandes. Mientras 
trabaja el metodo de la burbuja pue¬ 
des irte a tomar un cafe o a hacer cual¬ 
quier otra cosa. 





















































DECODIFICACION 
DE TEXTOS 


■ 

DECODIFICADOR EN LENGUAJE 

ENSAMBLADOR 

■ COMO SE PRODUCE LA DECODIFICACION 

■ 

CONVERSION A B1NARIO DEL 

■ 

MATERIAL CODIFICADO 


Completamos el compresor de texto 

DEFB 

CN-CODE 

DEFB 

CE-CODE 

anadiendo la rutina de decodifieacion. 

DEFB 

CH-CODE 

DEFB 

CO-CODE 

Por si no dispones de un ensamblador 

DEFB 

CE-CODE 

DEFB 

CA-CODE 

adecuado, aqui tienes tambien un lis- 

DEFB 

CN-CODE 

DEFB 

CA-CODE 

tado completo en hexadecimal de todo 

DEFB 

CE-CODE 

DEFB 

CD-CODE 

cl programa compresor. 

DEFB 

DEFB 

CR-CODE 

CH-CODE 

DEFB 

DEFB 

CE-CODE 

CE-CODE 

FIRST DEFB CUP-CODE 

DEFB 

CS-CODE 

DEFB 

CE-CODE 

DEFB CN-CODE 

DEFB 

CL-CODE 

DEFB 

CT-CODE 

DEFB CT-CODE 

DEFB 

CN-CODE 

DEFB 

CE-CODE 


























DEFB 

CE-CODE 

DEFB 

XI1110000 


CP 

# AO 

DEFB 

CE-CODE 

DEFB 

XI1100000 


JR 

N C ,VMN 

DEFB 

CU-CODE 

DEFB 

XI1000000 


CP 

P8C 

DEFB 

Cp-CODE 

DEFB 

XI0000000 


JR 

NC,VNA 

DEFB 

CU-CODE 

DEFB 

0 


CP 

#60 

DEFB 

CE-CODE 

ESETUP LD 

00,(23627) 


JR 

NC, VN 

DEFB 

CAR-CODE 

LD 

D,C 


JR 

VS 

DEFB 

CAR-CODE 

LD 

C/2 

V F OR 

LD 

t ,19 

DEFB 

CSP-CODE 

EREPEAT 

LD A,(HL) 


ADD 

HL,DE 

DEFB 

CAR-CODE 

CP 

#E0 


JP 

EREPEAT 

SECOND DEFB 

CT-CCDE 

JR 

NC/VFOR 

VMN 

INC 

HL 

DEFB 

CT-CODE 

CP 

#co 


LD 

A,(HL) 

DEFB 

CE-CODE 

JR 

NC,VSA 


CF 

#EC 


DEFB CF-CODE 
DEFB CI-CODE 
DEFB CO-CODE 
DEFB CT-CODE 
DEFB CI-CODE 
DEFB CD-CODE 
DEFB CO-CODE 
DEFB CT-CODE 
DEFB CN-CODE 
DEFB CS-CODE 
DEFB CA-CODE 
DEFB CE-CODE 
DEFB CH-CODE 
DEFB CO-CODE 
DEFB CT-CODE 
DEFB CL-CODE 
DEFB CH-CODE. 
DEFB CI-CODE 
DEFB CO-CODE 
DEFB CI-CODE 
DEFB CA-CODE 
DEFB CI-CODE 
DEFB CX-CODE 
DEFB CT-CODE 
DEFB CO-CODE 
DEFB CI-CODE 
DEFB CUP-CODE 
DEFB CPO-CODE 
DEFB CAR-CODE 
DEFB CUP-CODE 


LO DEFE3 0 
DEFB XI 
DEFB % 11 
DEFB %111 
DEFB %1111 
DEFB XI1111 
DEFB XI11111 
DEFB X1111111 


UP DEFB X11111111 
DEFB X1111111G 
DEFB XI 1111100 
DEFB XI1111GOO 



90 INPUT Juegos 













F 


A 







JR 

C,VMN 

VN 

LD 

E,6 


ADD 

HL,DE 


JR 

EREPEAT 

VS 

CP 

if z t ■ 


JR 

NZ,VSA 


PUSH 

HL 


DEC 

C 


JR 

Z,FINDEX 

VSA 

INC 

HL 


LD 

E,(HL) 


INC 

HL 


LD 

D,CHL) 



INC 

HL 


ADD 

HL,DE 


LD 

D,0 


JR 

EREPEAT 

VNA 

CP 

"z"+#20 


JR 

NZ,VSA 


PUSH 

HL 


POP 

IV 


DEC 

C 


JR 

1 ,FINDEX 


JR 

VSA 

FINDEX 

POP 

HL 


INC 

HL 


RET 



En ei capi'tulo anterior vimos e] me- 
todo de codificar textos en binario de 
forma que ocupen menos cantidad de 
memoria que con la codificacion habi¬ 
tual en ASCII, 

Los Hstados en lenguaje ensambla- 
dor corresponden a un program a que 
realiza esta funcion. 

Sin embargo, Hmitarse unicamente 
a la codificacion es algo que sirve de 
bien poco; lo unico que conseguirias 
con ello seria encontrarte frente a una 
ineomprensible masa de ndmeros bi¬ 
naries. For eso hace falta un progra- 
ma que sea capaz de realizar la deco- 
dificarion, Los listados que siguen a 
contifiuacion te permitiran ahadir al 
programa la seccidn decodificadora 
que te convierta de nuevo el mensaje 
en un texto legible. Tambien veremos 
la version hexadecimal completa del 
compresor de textos, que te sera de 
utilidad en el case de que no poseas 
un ensamblador adecuado. Una vez 
que hayas completado el programa, 
conservalo almacenado en cinta. 

En el proximo capitulo se muestra 
como utilizar el programa en un jue- 
go de aventuras, asi como la forma de 
desarrollar juegos con el compresor de 
textos. 


FUNCIONAMIENTO 


Partiendo desde el principio del tex¬ 
to codificado en binario, la maquina 
va tomando los bits de uno en uno, li- 
teralmente construyendo un numero 
binario cada vez mas largo. Despues 
de ia adicion de cada nuevo bit, el nu¬ 


mero se compara con los codigos de la 
tabla de conversidn, buscando algun 
emparejamiento, Si no se encuentra 
ninguno o, por el contrario, se en¬ 
cuentra mas de uno, el programa aha- 
de al numero un nuevo bit. El proce- 
dimiento se repite hasta que se en¬ 
cuentra un emparejamiento exefusivo 
para el codigo binario. 

Si la lectura del codigo se Inicia en 
el punto adecuado, inevitablemente se 
ha de encontrar un emparejamiento 
unico, 

Despu^s de esto, eE caracter se in- 
serta en una cadena, dejandolo listo 
para ser utilizado en BASIC. EI codi- 
go binario existente se elimina y se pa- 
sa a construir ei siguieme numero. El 
ordenador se entera de que el trozo de 
texto esta complete cuando se encuen¬ 
tra con el codigo de «fin de mensaje»; 
el programa en BASIC, del que nos 
ocuparemos en el siguiente capftulo de 
esta serie, se encargara entonces de vi- 
sualizar el texto sobre la pantalla. 

Si has decidido utilizar el listado en 
ensamblador, tienes que Ilamar al co¬ 
digo fuente existente para ahadirle a 
continuation la parte de decodifica- 
ciort que presentamos ahora. Despues 
de introdueir todo el listado, etisam- 
bia el programa completo y almacena- 
lo en cinta o disco, utilizando el pro- 
cedimiento previsto para el ensambla- 


dor empleado. 


DFIND PUSH 

IX 

PUSH 

IY 

CALL 

ESETUP 

LD 

C,(IY+8) 

LD 

B,(IY+9) 

ADD 

IY,8C 

LD 

C,(HL) 

INC 

HL 

LD 

B^HL) 

INC 

HL 

PUSH 

HL 

ADD 

HL,BC 

LD 

(DCTEST+1),HL 

LD 

A,7 

LD 

(BITTY+1),A 

LD 

HL / CSP 

LD 

C CHAR+2),HL 

POP 

HL 

LD 

A,H 

JR 

PUSHL 
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DCHASH 

LD 

A,9 


CP 

255+CSIX-CLAST 

DCLOOP 

CP 

#20 


JR 

NC,SIX 


CALL 

NC,DECODE 


ADD 

A,255 + CSIX-CLA: 


AND 

A 


SRA 

A 


JR 

Z,DCHASH 


JR 

FIV 


POP 

HL 

EIG 

DEC 

E 


LD 

< HL),A 

SEV 

DEC 

E 


INC 

HL 

SIX 

DEC 

E 

PUSHL 

PUSH 

HL 

FIV 

ADD 

A,CLAST+1-C0DE 

DCTEST 

LD 

BC,#FFFF 

FOUND 

LD 

HL,C0DE 


SBC 

HL,BC 


LD 

C, A 


JR 

NZ,DCLOOP 


ADD 

HL,BC 


POP 

HL 


LD 

A/E 


POP 

IY 


CP 

%10000000 


POP 

IX 


JR 

C,NOCHAN 


RET 



ADD 

A,8 

DECODE 

LD 

IX,LO 


INC 

IY 

BITTY 

LD 

DE,#0QF F 

NOCHAN 

LD 

(BITTY+1),A 


ADD 

IX,DE 


LD 

A,(IX) 


LD 

A,(IY) 


CP 

ll ll 


XOR 

(IY+1) 


LD 

a"(HL) 


AND 

(IX+1) 


JR 

NZ,NOTLWR 


XOR 

(IY+1) 


LD 

IX,CPUN 


LD 

B,E 


LD 

(CHAR+2),IX 


INC 

B 


SUB 

#20 

BRAN 

RRCA 



RET 



DJNZ 

BRAN 

NOTLWR 

CP 

HAH 


RLA 



JR 

NZ,NOTUPP 


DEC 

E 


CALL 

DECODE 


DEC 

E 


JR 

NZ,NOTUPP 


CHAR 


THREE 


LONGD 


LD 

JR 

RLA 

JR 

LD 

JR 

DEC 

RLA 

LD 

JR 

XOR 

JR 

RRA 

DEC 

DEC 

DEC 

CP 

JR 

ADD 

SR A 

OR 

CP 

JR 

ADD 

SRA 


IX,#FFFF 
C,LONGD 

C/THREE 

A,(IX+FIRST-CODE) 
FOUND 


NOTUPP 


ADD 

LD 

CP 

JP 

CP 

RET 

XOR 

RET 


A ,#20 

(CHAR+2),HL 


n ri 


Z,DECODE 

II IT 

Z 

# 20 ' 


A, (IX+SECOND-CODE) 
NC,FOUND 
A 

FOUND 

E 

E 

E 

255+CEIGHT-CLAST 

NC,£IG 

A,255+CEIGHT-CLAST 

A 

#80 

255+CSEVEN-CLAST 

NC,SEV 

A,255+CSEVEN-CLAST 
A 


Si no tienes ensamblador para el 
Spectrum, puedes utilizar el listado 
hexadecimal que viene a continua- 
cion. Pero antes de introducir el codi- 
go hexadecimal tienes que ejecutar los 
siguientes comandos en modo directo: 

CLEAR 64599 
NEW 

Ahora tienes que transcriber el si- 
guiente programa, el cual has de con- 
servar en cinta para poder introducir 
el cddigo maquina de la decodificacion 
que se presenta mas adelante: 

10 POKE 23658,8 

20 INPUT "DIRECCI0N C0MIENZ0? 


";SA 

30 INPUT LINE D$ 

40 IF D$="" THEN GOTO 30 
50 IF D$C1 >=*'#■' THEN STOP 
60 IF LEN D$=1 THEN GOTO 30 
70 LET S$=D$(1 TO 2) 

80 FOR N=1 TO 2 
90 IF S$(N)>"9" THEN LET 
S$(N)=CHR$(CODE S$(N)-7) 
100 IF S$(N)>''?' f OR S$(N)<"0" 
THEN PRINT FLASH 1; 
"CARACTER NO VALIDO" 

:G0T0 30 
110 NEXT N 

120 POKE SA, (CODE S$(1>-48) 
*16+C0DE S$(2)“48 
130 PRINT SA,DS( TO 2) 

140 LET D$(3 TO ) 

150 LET SA=SA+1 
160 GOTO 40 

Seguidamente teclea RUN e intro¬ 
duce la direccion de comienzo, es de- 
cir. 64600. Ahora debes teclear todos 
los numeros hexadecimales (pero no 
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!os espacios); cuando hayas terminado 

30 

OE 

1 C 

CB 

27 

C6 

10 

FE 

C8 

30 

28 

16 

23 

5E 

23 

56 

23 

19 

16 

00 

conserva en cinta 

el program a 

en 

DO- 

05 

1 C 

CB 

27 

C6 

38 

4F 

7E 

FE 

5E 

18 

C7 

FE 

9A 

20 

F2 

E5 

FD 

El 

OD 

digo maquina. 

por medio del coman- 

28 

OD 

DD 

7E 

OC 

FE 

5 F 

20 

03 

21 

28 

02 

18 

EA 

El 

23 

C9 

DD 

E5 

FD 

do SAVE « 

txt 

c o m p 

» CODE 

89 

FD 

22 

E3 

FC 

79 

ED 

4B 

E6 

FC 

E5 

CD 

DC 

FD 

FD 

4E 

08 

FD 

46 

09 

64600,684. 








41 

04 

07 

10 

FD 

DD 

21 

CB 

FD 

DD 

FD 

09 

4E 

23 

46 

23 

E5 

09 

22 

61 











09 

47 

DD 

A6 

01 

FD 

B6 

00 

FD 

77 

FE 

3E 

07 

32 

72 

FE 

21 

69 

FD 

22 

21 

OB 

00 

22 

67 

FC 

C9 

DD 

E5 

FD 

00 

78 

DD 

A6 

09 

FD 

77 

□1 

7B 

FE 

8C 

FE 

El 

7C 

18 

OD 

3E 

09 

FE 

20 

E5 

CD 

DC 

FD 

01 

FF 

FF 

FD 

71 

08 

80 

38 

04 

C6 

08 

FD 

23 

32 

E6 

FC 

D4 

6D 

FE 

A7 

28 

F6 

El 

77 

23 

E5 

FD 

70 

09 

FD 

E5 

FD 

09 

4E 

23 

46 

3E 

00 

C9 

20 

41 

53 

4F 

54 

52 

49 

01 

FF 

FF 

ED 

42 

20 

ED 

El 

FD 

El 

E5 

23 

09 

22 

8D 

FC 

3E 

07 

32 

E6 

4C 

45 

43 

5E 

5 F 

55 

4D 

50 

57 

59 

DD 

El 

C9 

DD 

21 

CB 

FD 

11 

FF 

00 

FC 

21 

69 

FD 

22 

E3 

FC 

El 

23 

E5 

4E 

42 

47 

44 

46 

56 

48 

4B 

51 

58 

DD 

19 

FD 

7E 

00 

FD 

AE 

01 

DD 

A6 

7E 

A 7 

01 

FF 

FF 

ED 

42 

28 

07 

CD 

4A 

5 A 

5B 

5 C 

5D 

OA 

11 

04 

11 

17 

01 

FD 

AE 

01 

43 

04 

OF 

10 

FD 

17 

B5 

FC 

C6 

00 

28 

ED 

El 

3E 

00 

CD 

08 

11 

08 

05 

17 

02 

07 

11 

08 

03 

ID 

ID 

DD 

21 

FF 

FF 

38 

12 

17 

38 

R5 

FC 

FD 

23 

FD 

E5 

El 

Cl 

3 A 

F6 

01 

01 

14 

08 

08 

08 

04 

08 

08 

08 

05 

DD 

7E 

20 

18 

2 F 

ID 

17 

DD 

7E 

FC 

C6 

F9 

ED 

42 

22 

67 

FC 

F 


jZ 

OE 

OC 

08 

OB 

OB 

00 

OB 

04 

04 

41 

30 

28 

AF 

18 

25 

1F 

ID 

ID 

1 1 

DD 

El 

C9 

06 

20 

FE 

40 

38 

02 

EE 

J8 

15 

06 

03 

04 

06 

14 

03 

04 

11 

FE 

F8 

30 

18 

C6 

F8 

CB 

?F 

F6 

80 

20 

4F 

21 

88 

FD 

96 

28 

1 C 

FE 

20 

02 

01 

08 

17 

03 

04 

07 

17 

06 

03 

FE 

F4 

30 

OF 

C6 

F4 

CB 

2 F 

FE 

EA 

20 

08 

3E 

7E 

E5 

C5 

CD 

B5 

FC 

Cl 

06 

01 

06 

1 A 

04 

03 

06 

OA 

IE 

OB 

30 

08 

C6 

EA 

CB 

2 F 

18 

03 

ID 

IP 

El 

IS 

OD 

FE 

EO 

20 

04 

3E 

7F 

18 

OA 

00 

01 

G3 

07 

OF 

1 F 

3F 

7F 

FF 

ID 

C6 

20 

21 

69 

FD 

4 F 

09 

7E 

FE. 

EF 

79 

28 

10 

E2 

C9 

78 

DD 

21 

FF 

FE 

FC 

F8 

FO 

EO 

CO 

80 

00 

2 A 

4B 

80 

38 

04 

C6 

08 

FD 

23 

32 

72 

FE 

FF 

IE 

FF 

ID 

ID 

3D 

28 

13 

DD 

BE 

5C 

16 

00 

OE 

02 

7E 

FE 

EO 

30 

12 

DD 

7E 

00 

FE 

5 F 

7E 

20 

08 

DD 

21 

20 

20 

04 

3E 

00 

18 

31 

ID 

DD 

BE 

FE 

CO 

30 

26 

FE 

AO 

30 

OF 

FE 

80 

89 

FD 

DD 

22 

8C 

FF 

D6 

20 

C9 

FE 

41 

20 

09 

3E 

40 

18 

27 

3E 

60 

ID 

30 

28 

FE 

60 

30 

OD 

18 

10 

IE 

13 

5E 

20 

07 

CD 

6D 

FE 

20 

02 

C6 

20 

18 

22 

ID 

ID 

1 D 

ID 

ID 

C6 

EO 

FE 

19 

18 

E4 

23 

7E 

FE 

EO 

38 

FA 

IE 

22 

8C 

FE 

FE 

5 F 

CA 

6D 

FE 

FE 

2D 

F8 

30 

17 

1 C 

CB 

27 

C6 

08 

FE 

FO 

06 

19 

18 

D9 

FE 

5A 

20 

04 

E5 

OD 

CS 

EE 

20 

C9 
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UTILIZA TU COMPRESOR 
DE TEXTOS 


■ AHORRO DE MEMORtA 
■CODIFICACION DE LAS SENTENCES PRINT 

■ _ LA BUTINA DE DECODIFICACION 

■ _ ADAPTACIQN DEL PROGRAMA 

DE AVENTURAS 



S6cale punta al lapiz y ponte a tra- 
bajar en tu obra maestra. Con un com- 
presor de text os que (undone a tope 
puedes escribir la aventura epica con 
la que siempre sonaste. 


En este momento dispones de un 
programa en codigo maquina almace- 
nado en cinta. Tanto si has arrancado 
a partir del listado en lenguaje en en- 
samblador, como si io has hecho par- 
tiendo del hexadecimal, el programa 
es exactamente el mismo. Pero para 
poder utilizar el codigo maquina tie- 
nes que escribir algo en BASIC. 

En esta parte veremos la manera de 
utilizar el BASIC con ei compresor de 
textos en codigo maquina y como in- 
corporarlo en un juego de aventuras. 


DESARROLLO DE JUEGOS DE 
AVENTURAS 


Hemos visto anteriormente la ma¬ 
nera de escribir juegos de aventuras. 
Con unas pequenas modificaciones de 
I os programas, puedes utilizar el com¬ 
presor de textos para ahorrar una gran 
cantidad de memoria. 

Para empezar. escribe tu aventura 
con arreglo a las directrices dadas an¬ 
teriormente, pero procura incluir 
mensajes que scan cortos, ya que mas 
adelante los eliminaremos. Por ejem- 
plo, a Io mejor quieres escribir algo 
como ACABAS DE LLEGAR A UN 
CLARO DEL BOSQUE. HAY UNA 
PATA DE PALO PARCTALMEN- 
TE OCULTA POR UN MANTEL. 
En vez de teclear todo esto, utiliza en 
la sentencia PRINT algo mas breve, 
por ejemplo CLARO. Haz Io mismo 


^-hJV TQiam*. 
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en todas las sentencias PRINT, para 
que puedas comprobar que tu aventu- 
ra realmente funciona, depurandola y 
cerciorandote de que no tiene errores 
logicos graves. 

Cuando estes satisfecho con el pro- 
pio juego, puedes pasar a utilizar el 
compresor de textos y escribir de nue- 
vo las sentencias PRINT. 

Lo primero que has de hacer es de- 
cidir lo que realmente tienen que de- 
cir tus mensajes. Si dispones de una 
impresora, el trabajo puede resultar 
mas sencillo ya que puedes listar el 
program a y trabajar sobre el papel. 
Escribe una lista de mensajes junto 
con los numeros de Imea correspon- 
dientes a cada mensaje. Toda senten- 
cia PRINT que contenga mas de dos 
o tres palabras, te va a merecer la 
pena codificarla. En los mensajes mas 
cortos es poco o nada el espacio de 
memoria que se ahorra con la codifi¬ 
cation, por lo que te puedes ahorrar 
el trabajo de hacerla. 


FUNCIONAMIENTO 


AI codificar cl texto, el programa en 
codigo maquina almacena la informa- 
cion en binario en una matriz llamada 
Z. Hay otra matriz. A, que contiene 
los punteros que permiten a la maqui¬ 
na saber en que parte de Z comienza 
cada uno de los mensajes. 

Cuando quieras decodificar, es de¬ 
ar, escribir en pantalla alguno de ios 
mensajes, se utilizan los punteros que 
hay aim ace n ados en A para extraer la 
section correcta de informacion en bi¬ 
nario con la que alimentar la rutina dc 
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decodificacion. A mcdida que va sien- 
do decodificada la informacion en bi¬ 
nario. los caracteres se van cargando 
en una cadena llamada Z$. que pre- 
viamente ha sido definida con una lon- 
gitud igual a la del mensaje mas lar¬ 
go. Para que aparezca el mensaje en 
pantalla, no tienes mas que mandar al 
ordenador que haga PRINT Z$ y su- 
ministrarle el numero adecuado de A 
que le diga que parte del mensaje tie¬ 
ne que cargar en Z$. 

Despues de que hayas probado el 
programa de aventuras con las senten¬ 
cias PRINT resumidas, puedes empe- 
zar a utilizar el compresor de textos. 

Con el juego de aventuras todavia 
cargado en la memoria, carga o teclea 
las siguientes Itneas de programa. 


9900 

9905 


991C 

9915 
992 C 

9925 

9930 

9935 

9940 

9945 


9950 

9955 

9960 

9965 

9970 


9975 

9980 


INPUT INVERSE 1;"TECLEA 
MENSAJE ";<N),LINE Z$ 

IF Z$=’’" THEN LET M=N 
:GOT0 9975 

RANDOMIZE USR 646071 
LET AC M) = ZC1) 

IF MEM+ZC1X1100 AND MEM 
+ZC1)>900 THEN PRINT 
"ALREDEDOR DE 1000 BYTES 
LIBRES" 

NEXT M 

PRINT FLASH t;TAB(6>; 
"AH0RA GRABA TU PROGRAMA 
";TAB(6);"NO HA6AS RUN 
0 CLEAR!";TAB(31); 


CLEAR 64580! :L0AD’"’C0DE 
LET MEM=6000C1- 
(PEEK 23653+256*PEEK 
2365M 

PRINT "ALREDEDOR DE " 
;MEM;"BYTES LIBRES 1 ' 

DIM ZCINTCMEM/5)) 

INPUT "CUANT0S MENSAJES? 

DIM ACM) 

RANDOMIZE USR 64600! 

LET Z(1)=11 

FOR TO / / > ^ 

CLS ^ 


Despues de insertar en tu magneto- 
fono la cinta que contiene el compre¬ 
sor de textos, teclea GOTO 9900. El 
cddigo maquina sera cargado en la If- 
nea 9900, 

El programa examina la cantidad de 
memoria disponible y te pregunta 
cuantos mensajes quieres introducir 
Cuando le hayas respondido, el pro¬ 
grama te invitara a que teclees men¬ 
sajes uno tras otro. Debes tener cui- 
dado a! introducir mensajes que ten- 
gan mas de una lmea de extension, En 
tales casos no debes pulsar la tecla de 


retorno de carro | RETURN ya que el 
ordenador lo interpretaria conic on fi¬ 
nal de mensaje. En vez de hacer eso, 














na corta 


LET 2(1)=A(N): 
RANDOMIZE USR 65067 
:PR1NT ZS 
RETURN 


1 LET Z$="XXXXXXXXETC 


Con la nueva version del programa 
as! coinpletada, vuelve a almacenarla 
en cinta. Cuando quieras jugar el jue- 
go teclea: 


A continuacion tienes que ir reco- 
rriendo el programa. sustituyendo 
cada sentencia PRINT correspondien- 
te a un mensaje codificado por una 
nueva instruccion. Supongamos que 
quieres llamar al mensaje codificado 
correspondiente a la segunda senten¬ 
cia PRINT. Gambia 


PRINT "MENSAJE 


LET f\=2 : GGSUB 9900 




Para ejecutar el programa con el 
texto comprimido, NUNCA pulses 
RUN, porque perdenas todos tus 
mensajes, Lo que debes hacer es te- 
clear GOT O 1 * 


wl 


Con esto se le asigna a ia variable 
N un valor igual a I numero del men¬ 
saje y a continuacion se inicia la su- 


Ilena las Jfneas con espacios de forma 
que las mensajes queden adecuada- 
mente formateados; I os espacios no 
ocupan much a cantidad de memoria. 

El programa te avisa cuando que- 
dan ones 1000 bytes en la memoria. Si 
recibes este mensaje mientras estas te- 
cleando, ten cuidado de que no se te 
rompa el programa per escribir unas 
partes sob re otras. Si crees que te vas 
a pasar* consulta tu lista de mensajes 
e intent a acortarlos. Despues empieza 
a introducirlos otra vez desdc el prin- 
cipio. 

Cuando hay as term in ado, ha bra un 


mensaje que te indicara que almace- 
nes el programa, Para ello no tienes 
mas que reel ear SAVE «nombre del 
programa», con io que se almacena- 
ran juntos la aventura y el texto com- 
primido. 

Cuando tengas seguro en cinta el 
texto comprimido. puedes modificar 
el programa de aventura para que 
pueda utilizar el compresor de textos 
en codigo maquina junto con los da¬ 
tes almacenados en lugar de las sen¬ 
tences PRINT provisionales. Borra 
todas las Sfneas desde 9900 en adelan- 
te. tecleando en su lugar esta subruti- 


brutina. Esta subrutina extrae cl ele- 
mento N-simo de la matriz A t que 
son los punteros validos para selec- 
cionar la parte correcta de Z, a con¬ 
tinuation carga el mensaje en ZS y lo 
imprime. 

Finalmente necesitaras un ZS vaefo, 
para que pueda usarlo el codigo ma¬ 
quina de forma que pueda presentar 
cl texto decodificado. Define ZS como 
quieras, lo mas cerca del principio del 
programa que te sea posible; recuer- 
da que debe tener la longitud suficien- 
te para aceptar el mensaje mas largo 
esperado. Algo del tipo de lo siguien- 

































































RALENT1ZAD0R 

DE PROGRAMAS 


Un diminuto aparato que cabe en la 
palma de la mano dobiega al poderoso 
microprocesador del Spectrum, ha- 
ciendole ejecutar a la velocidad que le 
marque el usuario, 

El dispositivo Slomo va incorpora- 
do en et interior de un receptaculo de 
plastico negro. De su parte anterior 
parte un cable que termina en el cl&- 
sico conector tipo peine, que se inser- 
tara en la ranura de expansion del 
Spectrum. 

En la cara anterior han sido dts- 
puestos los mandos, Un boton permi- 


te controlar la cantidad de giro del 
cursor de un poteneibmetro, entre 0 y 
270 grados. Debajo asoma un diminu¬ 
to LED rojo y dos pulsadores. El pa- 
pel que juegan estos elementos es lo 
que veremos seguidamente. 

Una vez conectado el Slomo al or- 
denador, se conecta la a lime ntaci on y 
podemos proceder, por ejemplo, a te- 
clear un corto programa. El manual 
aconseja un bucle de conteo con 
FOR...NEXT. Al ejecutarlo podemos 
observar como la ejecucibn se detiene 
presionando el pulsador «freeze» (con- 
gelar). El otro pulsador, «Slow Mo¬ 


tion » (movimiento iento), per mite que 
entre en accibn el control de velocidad 
de ejecucion, mediante el boton gira- 
torio, para que el programa tenga una 
velocidad totalmente ajustable. 

Lo interesante del Slomo es su total 
compatibilidad con cualquier progra¬ 
ma. ya que funeiona a nivel hardwa¬ 
re , enviando interrupciones directa- 
mente al microprocesador, de tal ma- 
nera que su control es total, indepen- 
dientemente del tipo de software que 
estemos manejando. 

Todos los programas que hemos 
comprobado en funcionamiento con 
este dispositive se han eonvertido en 
sumamente dbciles de dominio casi 
completo de sus evoluciones. Su avan- 
ce puede contemplarse comodamente 
con solo ajustar la velocidad a nuestro 
gusto, Esquivar los antano peligrosos 
monstruos y misiles se convierte en un 
juego de nines. 
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ENTENDIENDO 

LOS CODIGOS ASCII 


■ 

iQUE ES EL CODIGO ASCII? 

■ 

USO DE NUMEROS EN 

LUGAR DE CARACTERES 

■ 

PROGRAMA PARA IMPRIMIR 

MENSAJES CIFRADOS 


El codigo ASCII empieado por Jos 
ordenadores tiene las suficientes serne- 
janzas para permitirles literalmente 
«hablar» unos con otros. Este ^lengua- 
je comtin» tiene tambien otros uses... 

Cada tecla o combinacion de teclas 
de tu ordenador esta representada por 
un codigo electronico unico, Estos co~ 
digos se representan en BASIC por 
una serie de valores decimales que van 
desde 0 hasta 255, Por ejemplo, a la 
letra A le corresponde el valor deci¬ 
mal 65, a la B el 66, etcetera, Cuando 
tecleas letras o palabras cualesquiera, 
lo que el ordenador realmente alma- 
cena son estos codigos* 

Los valores correspondientes a cada 
eonfiguracion de teclas no son los mis- 


mos en todos los ordenadores, pero 
afortunadamente existe al menos una 
cierta estandarizacidn en la forma en 
que dichos valores se describen y utili- 
zan. 

Este conjunto de valores de desig- 
na por las siglas ASCII que significa 
Codigo Americano Normalizado para 
Intercambio de Information { Ameri¬ 
can Standard Code for Information In¬ 
terchange ), Este codigo se elabord 
para disponer de un medio por el que 
los ordenadores pudieran transferirse 
dates de unos a otros, 

Los Commodore y Spectrum utili- 
zan este codigo, al menos en parte, El 
ZX81, en cambio, tiene un codigo 
completamente diferente, unico para 
esta maquina. 


EL CODIGO ASCII 


El con junto complete de caraeteres 
ASCII no es igual para todos los or¬ 
denadores, Pero hay bastantes seme- 
janzas. El mayor paralelismo se pro¬ 
duce en el interval© desde 33 hasta 90, 
que cubre todos los simbolos norma- 
les: signos de puntuarion, numeros y 
letras mayusculas. Hay una forma 
muy sencilla de encontrar el codigo 
ASCII de un caracter cualquiera; para 
ello no tienes mas que teclear PRINT 
CODE «X» y te aparecera el eddigo 
ASCII de «X» o de cualquier otro ca¬ 
racter, El siguiente programa te per- 
mite introducir lo caraeteres con mas 
facilidad. 














































30 PRINT "EL C0D1G0 ASCII 
PARA A$; lf ES "CODE A$ 

La funcion in versa de CODE es 
CHR$, que realiza la conversion del 
niimero de codigo a su correspondien- 
te earacter. El programa que viene a 
continuacion convierte en caracteres 
todos los codigos ASCII comprendi- 
dos entre el 33 y el 90: 

10 PRINT "CODIGO ASCII", 
"CARACTER" 

20 FOR N=33 TO 90 
30 PRINT N,CHR$ (N) 

40 FOR D”1 TO 500: NEXT D 
50 NEXT N 

Las letras minuscules del aifabeto se 
extienden en el margen de 97 a 122, 
como puedes com pro bar cambiando 
por 122 la ultima tifra que figure en 
la linea 20, Si ahora cambias de nue- 
vo dicha cifra por 256, obtendras la re¬ 
presentation del eonjunto completo 
de caracteres. En el manual de tu 


equipo puedes ver el listado completo 
de los caracteres. 


USO DEL CODIGO ASCII 


La ventaja de utilizer un numero cn 
vez de un earacter, consiste en que 
puedes modificar matematicamente 
dicho numero de varias maneras* Si 
despues de hacerio imprimes el earac- 
ter del nuevo numero, obtendras una 
letra diferente. Esta es la base de mu- 
chos programas de escritura de codi¬ 
gos, Se trata de una utilidad de gran 
valor, ya que no es posible manipular 
directamente una letra aplicandole 
una operacion matematica. 

Las codigos mas sencillos se limit an 
a anadir una cantidad cons tan te a eada 
numero, con lo que resulta de heeho 
una traslacidn de la letra en el aifabe¬ 
to. Por ejemplo, la A se convierte en 
G, la B en H y asi sucesivamente. Pero 
estos codigos resultan muy faciles de 
romper; despues de todo, no seria 


muy dificil escribir un programa de or- 
denador para probar eada una de las 
26 combinaciones posibles, siendo 
muy facii detectar de una ojeada cual 
es la cor recta. 

Para que el programa tenga alguna 
eficacia, tiene que hacer cosas mas 
complicadas con los numeros; el pro¬ 
grams siguieme utilize un codigo de 
forma que eada letra del mensaje se 
altera de una manera diferente. Este 
tipo de codification es muy diffcU de 
romper, a men os que se sepa cual es 
la palabra codigo, 

10 POKE 23658,8: LET CP=0: 

LET PR=0: LET D$="" 

20 CIS 

30 INPUT "CUAL ES EL CODIGO? 
";LINE C$ 

40 PRINT ''ESCRIBE EL MENSAJE; 
_ 11 

50 INPUT LINE M$ 

60 LET CF=CP+1: IF CP>LEN C$ 
THEN LET CP=1 
70 LET PM=PM+1 
























80 IF PF1>LEN M$ THEN GO TC 
200 

90 LET F$=MS<PM) 

100 IF F$<"A" OR F$>' , Z' 1 THEN 
GO TO 150 

110 LET F=CODE FS+CODE C$ 
(CPl-65 

120 IF F>90 THEN LET F=F-26 
130 LET D$=D$+CHR$ F 
140 GO TO 60 

150 IF IF $< 1 '□ 11 OR F$>"9" THEN 
LET D $= D 35+ F $: GO TO 70 
160 LET F=CODE FS+CODE C$ 
(CPI-48 

170 IF F>57 THEN LET F=F-10: 
GO TO 170 

180 LET D$=D$+ CHR$ F 
190 GO TO 60 
200 PRINT ’'EL MENSAJE 
CODIFICADO ES:-" 


210 PRINT 1 D$ 

220 STOP 

El program a te pide que introduz- 
cas la palabra codigo y el mensaje. y 
a continuacidn imprime la version ci- 
frada. El mensaje ya esta proiegido y 
solo lo podra descifrar alguien que co- 
nozca la palabra. 

La forma en que trabaja el progra- 
ma es muy sencilla y se parece mucho 
al programa de codificacion simple, 
con la salvedad de que en vez de su- 
mar una cantidad const ante a cada le- 
tra, se le suma el codigo ASCII de la 
primera letra de la palabra codigo a la 
primera letra del mensaje, el de la se- 
gunda letra de la palabra codigo se 
suma a la segunda letra del mensaje, 
etcetera. Cuando se llega ai final de la 
palabra codigo, el ciclo comienza de 
nuevo. 


Si al sumar los mimeros se obtiene 
un resultado mayor que 90 —lo que 
supone irse mas alia de la letra Z— se 
restan 26 para mantenerse dentro del 
margen correspondiente a las letras 
del alfabeto. Los niimeros reciben un 
tratamiento separado en las ifneas 150 
a 180, a fin de mantener sus eddigos 
ASCII entre 48 y 57. que correspon- 
den a los numeros 0 a 9. 

El programa de descifrado es muy 
parecido al primero; la unica diferen- 
cia consiste en que se han cambiado 
unos cuantos +s y — s. La numeration 
de las Ifneas es coherente con la del 
programa anterior, a fin de que pue- 
das almacenar el programa com bin a- 
do. 

Tienes ademas unas cuantas Imeas 
adicionales que tc permiten seleceio- 
nar la codificacion o decodificacion de 
un mensaje. 
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12 INPUT "(C)ODIFICAR 0 (0) 
ECODIFICAR?"; LINE A$ 

14 IF AS^’D 1 ' THEN GO TO 400 
16 IF A$<>"C'' THEN GC TO 12 
400 CLS 

410 INPUT "CUAL EL EL CODIGO 
? LINE C$ 

420 PRINT "TECLEA EL MENSAJE 
CODIFICADO:-" 

430 INPUT LINE 
440 LET CP=CP+1: IF CP>LEN 
CS THEN LET CP=1 
450 LET PM=PM+1 
460 IF PN>LEN M$ THEN GO TC 
580 

470 LET F$=H$(PM) 

480 IF F$<"A" OR F$> ,1 Z'' THEN 
GO TO 530 

490 LET F=CODE FS- 
JN. CODE C$(CP)+65 

m? 500 IF F<65 THEN LET 

/ F=F+26 

510 LET D$=D$+CHR$ F 
520 GO TO 440 

530 IF F$<"C" OR F$>*'9" THEN 
LET D$=D$+F$: GO TO 450 
540 LET F=CODE FS-CODE C$ 
(CP)+48 

550 IF F<48 THEN LET F=F+1G: 
GO TO 550 

560 LET D$=D$+CHR$ F 
570 GC TO 440 
580 PRINT "'EL NF.NSAJE 
DECODIFICADO ES:-" 

590 PRINT 1 DS 
600 STOP 

Digamos de paso que si realmente 
quieres conseguir que tu codigo sea 
muy diftcil de romper, siempre puedes 
volver a cifrar tu mensaje cifrado uti- 
lizando una segunda palabra codigo. 
Acuerdate de colocarlas en el orden 
correcto cuando descifres de nuevo el 
mensaje. 


COMPARACIONES 


Una de las principales aplicaciones 
Je los valores del codigo ASCII es la 
comparacion de cadenas de caracte- 
-l's. Dichas comparaciones de cadenas 
>l’ hacen caracter a caracter y de iz- 
juierda a derecha, hasta que se ilega 
: final de la cadena. Supongamos. per 


ejemplo. que hay que comparar dos 
cadenas tales como «COSMOS» y 
«COSMIC». El ordenador primero 
eompara las dos C. despues las O, las 
S y las M. Seguidamente se eompara 
la O de la primera cadena con ei co- 
rrespondiente caracter de la otra ca¬ 
dena, que es la I. 

Lo que se eompara no es un con jun¬ 
to arbitrario de valores alfabeticos, 
sino el valor ASCII de cada caracter. 
El valor ASCII de la O es mayor que 
el de la I, por lo que en esta compa- 
racidn «COSMOS» tiene un valor ma¬ 
yor que «COSMIC». Observa que no 
se utilizan las sumas de los valores AS¬ 
CII de las letras para determinar cual 
es la cadena que tiene un mayor va¬ 
lor. Cada letra se eompara individual- 
men te, 

Aqm tienes como ejemplo algunas 
comparaciones que muestran posibles 
valores de AS y B$, junto con los co- 
digos ASCII de los caracteres que in- 
tervienen. Es importante comparar los 
valores uno a uno. el primer caracter 
de AS con el primero de B$, siguien- 
do asf en toda la extension de la pala¬ 
bra mas corta. ver tabla 1. 

A3/ASCII BS/ASCII RELAC10N 

ABC 65,66,67 ABC 65,66,67 A$ = B$ 

ABD 65,66,68 ABCD 65,66,67 A$>B$ 

ABD 65,66,68 ABCD 65,66,67 A$oB$ 

ABC 65,66,67 Abe 65,97,98 A$<B$ 

COSMI 67,79,33, COSMO 67,79,83, A$<B$ 

77,73 77,79 

$] 36,49 31.0 36,49,46 A$<B$ 

Como puedes observar en los ejem- 
plos segundo y tercero. se puede es- 
cribir la relation de mas de una for¬ 
ma. Ffjate tambien en el ultimo ejem¬ 
plo, en el que a igualdad de todo io de- 
mas. se considera que es mayor la ca¬ 
dena de caracteres mas larga. 


COMPROBACION DE LAS 
ENTRADAS 


La funcion CODE actua unicamen- 
te sobre ei primer caracter de la cade- 
na. Asf, la instruction PRINT CODE 
«USA» dara como resultado el nfime- 
ro 85, que es el codigo ASCII de la le¬ 
tra «U». Este hecho resulta muy util 


en la comprobacion de las entradas 
que se suministran a los programas 
por medio del comando INPUT. Por 
ejemplo. en el anterior programa de 
escritura de codigos, la Ifnea 12 te pe- 
dfa que introdujeras la letra C para ci¬ 
frar o la letra D para descifrar. A con¬ 
tinuation. las dos Imeas siguientes en- 
caminan el programa a la section ade- 
cuada. Pero si quieres impedir que al- 
guien escriba «cifrar» o «descifrar» in 
extenso, puedes volver a escribir asf las 
ifneas 14 y 16: 

14 IF CODE A$=68 THEN GO TC 
4Q0 

16 IF CODE A$<>67 THEN GO TC 

12 


CODIGOS DE CONTROL 


Algunos codigos ASCII no van aso- 
ciados a ningun caracte r. Por eje mplo, 
cuando pulsas la tecla ] ENTER | el or¬ 
denador almacena el valor 13, pero en 
lugar de imprimir un caracter en la 
pantalla el cursor se desplaza al prin- 
cipio de la siguiente Ifnea o se lista el 
programa. Se dice que el eddigo 13 es 
el codigo del retorno de carro, y en al¬ 
gunos casos el eddigo de Ifnea nueva. 
Teclea PRINT «A»;CHR$(13);«B» y 
observaras que la «B» se imprime en 
una nueva lmea directamente debajo 
de la «A». 

Aquf tienes la manera de encontrar 
ios codigos ASCII de las tedas que no 
corresponden a caracteres: 

10 PRINT CODE INKEYS 
20 GC TO 10 

Prueba a pulsar | ENTER | , I DELE- 
te~| , o cualquier otra tecla de tu orde¬ 
nador. Puedes utilizar este metodo 
para detectar las pulsaciones de tecla 
en los programas de juegos. Por des- 
gracia no puedes utilizar los valores de 
forma inversa. es decir, aunque el cd- 
digo 10 corresponde al movtmienta 
del cursor hacia abajo, PRINT 
CHR$(10) no hard que el cursor se 
mueva hacia abajo. 

Unos ordenadores utilizan estos cd- 
digos mas que otros. Hay muchos nu- 
meros disponibles: desde el 1 al 31 y 
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unos cuantos per encimu del 90, pero 
inicialmente fueron definidos en los 
dfas en que los ordenadores estaban 
conectados a impresoras, por lo que 
los codig os estan relacionados funda- 
mentalmente con el control de aque- 
lias vetustas impresoras* Naturalmen- 
te en la actuaiidad los ordenadores es¬ 
tan disenados para ser utilizados con 
un monitor de video, por lo que la ma- 
voria de los eddigos ya no se aplicam 


si hien algunos de ellos se pueden uti- 
lizar en las impresoras tnodernas. 

El Spectrum dene redefinidos mu¬ 
ch os de los eddigos para que funcio- 
nen sobre la pantalla de un televisor, 
Por ejemplo, PAPER tiene el codigo 
17 mientras que INK (tinta) tiene el 
codigo 16. Asu para imprimir la pala- 
bra «TTTULO» en la pantalla, con le- 
tras rojas sobre fondo verde, puedes 
utilizar este programs: 


10 LET A$=CHR$ 17+CHRS 
4+ CHR$ 16+CHRS 2 + 
"TITULG 11 
20 PRINT A$ 

Cuando se trate de una cabecera 
que quieras utilizar varias veces en un 
programs, no tienes mas que definir 
A$ una vez al principio, v a continua- 
cion utilizar A$ cada vez que necesi- 
tes hacerlo. 
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Si quieres ver 




programas 


( o articulos. 


tu revista, 




examina 


publicados en 


las 


bases y haznos Hep 

Publicar tiene su recompensaT 




el material, 


BASES 



PROGRAMAS: Una vez desarrollado tu programs, 
que debe ser original v no habcr sido enviado a niiigLina 
OLra publication. puedes emiarnoslo aqui grabado en 
cassette, diskette o microdrive. Es prefer]ble que vaya 
acornpaflado por un listado de impresora, pero no es 
imprescindible. 

El programa habra de venir acompanado por tin texto 
q tie aclare dial es su objetivo, d modo de funciona- 
miento y una explication del cometido que eumplen las 
distinLas rutinas que locomponen. El texto se presenta- 
ia en pa pel de Lama no folio y mecanografiado a dos 
espaeius. No importa que la redaction no sea muy elara 
y cuidada: nuestro equipo de expertos se encargara de 
proportionate la forma mas atractiva posable, 
ARTICULOS E IDEAS: Se aplica lo anteriormente 
dicho para I os texios que acompaftan a los programas: 
es dear. conviene detallar a I maxima to que desees que 
aparezca publicado en la revista, de la manera que te 
gustaria que otra persona hubiera explicado eso mismo. 
UN JURADO propio decidira en cada momento que 
colaboraciones reunen los requisites adecuados para su 
publication, y evaluara la euamia del premio en metali- 
co al que se hagan acreedoras. 

No olvideis indicar daramente para que ordenador esta 


preparade el material asi como vuestro nombre y 
direction y. cuando sea posible, un telefono de contac¬ 
ts. Entre tod os los trabajos recihidos durante cada mes 
SORTEAREMOS: 

• Un premio de 50.000 ptas, 

• Un premio de 25.000 ptas. 

• Un premio de 10.000 ptas. 

en material microinformatico a elegir por 
los afortunados. 

;No os desunimeisl. por muy simples o complejus que 
puedan parecer vuestras ideas, todas scran revisadas 
con el maximo imeres. 


INPUT SINCLAIR 




Alberto Alcocer, 46, 4.° B 
28016 Madrid 


NOTA: INPUT no so responsiibilizu de la devolution del 
material quo no vavu acompanado por un sob re adeem* do con 
el tVanqueo correspond junto. 
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MANEJO 

DE INTERRUPCIONES 


INTERRUPCIONES EN EL Z80 

___LA LINEA I NT 

EL COMANDO BEEP Y LAS 

_ INTERRUPCIONES 

PROGRAMA MUSICAL 


De las 40 patillas que tiene el micro- 
procesador del Spectrum (Z80) Kay 
dos ligadas directamente con las inte- 
rrupciones y son INT (pin 16) v NMI 
(pin 17)* 

AI hablar de interrupciones nos re- 
ferimos a una suspension temporal de 
la tarea que en ese memento este rea- 
iizando el ordenador para efectuar 
otra que se le encomiende, retornan- 
do luego a la situacion anterior* 

Se produce una interrupcion cuan- 
do se activa la llnea INT o la NMI, En 
el primer case se dice que se ha pro- 
ducido una interruption «enmascara- 
ble» y en el segundo una interruption 
«no-enmascarable». 

Hay que aclarar que el Spectrum no 
uliliza todas las posibilidades que ofre- 
ce el Z-SO en cuanto a interrupciones* 
Solo nos referiremos, pues. a lo que 
nos afecte. 

Hay que matizar que las interrup- 
ciones, en si. no producen directamen¬ 
te mas que el efecto de dlamar la 
atenci6n» del microprocesador. Cuan- 
do se detecta una interruption detie- 
ne el program a que esta ejecutando y 
acude a cierto lugar para recibir ins- 
truedones (rutinas dc mane jo de inte¬ 
rrupciones) v ejecutarlos, continuan- 
do despues con el programa principal 
en el lugar en que lo dejo* Se dice que 
las interrupciones son «vectorizadas» 
ya que dependiendo del modo en que 
se trabaje existe una direction de me- 
moria (vector de interruption) que in- 
diea una nueva direccion que corres¬ 
ponds a la rutina a ejecutar. 

Una interrupcion es «enmascara- 
b[c» si puede no tenerse en cuenta. 
For el contrario, a una interrupcion 
no-enmascarable, siempre hay que ha- 
ceric caso. Vamos a poner un ejemplo 
sencillo para aclarar un poco mas I os 
conceptos. 

imaginemonos en una oficina don- 
de existen dos timbres: el del tefefono 


v cl de la alarma de incendio, Estamos 

a* 

trabajando normalmente y en un cier¬ 
to momento nos intermmpe el sonido 
de un timbre* St suena el telefono, lo 
normal es dejar lo que estamos ha¬ 
de ndo, descolgamos, atendamos la 
llamada (rutina de contestation) v 
continuemos con nuestro trabajo has- 
ta que tengamos otra interrupcion Te¬ 
lefonica. No obstante, si estamos ha- 
eiendo algo que no nos interesa dejar 
podemos optar por no coger el telefo- 
no (dejarlo descolgado o desconectar 
el timbre el tiempo necesario), En este 
caso estamos enmascarando, ignoran- 
do o inhabilitando la llamada. For su- 
puesto no debemos olvidarnos habili- 
tar de nuevo la situacion porque en 
caso contrario quedarfamos desconec- 
tados incapaeitados para recibir llama- 
das del mundo exterior* 

Si el timbre que suena, es el de la 
alarma de fuego. nos guste o no debe- 
remos dejar lo que estemos haciendo 
y ejecutar las instrueciones oportunas 
(rutina de instruction de no-enmasca- 
rable) como puede ser salir por la es- 
calera de incendios asignada a esa 
zona, A ningun arquitecto se le ocu- 
rrirfa poner un interrupter para que en 
caso de estar muy ocupados no nos 
moleste ni la alarma de fuego. Este 
tipo de interruepiones son por tanto 
No-enmascarables, 

Como program ad ores en codigo 
maquina tenemos solo a nuestra dis- 
posicidn las interrupciones que nos lle- 
gan por la linea INT, Las interrupcio¬ 
nes que proceden de la linea NMI 
(No-enmascarables) tienen prioridad 
sobre las INT y en el Spectrum las 
controla unicamente el ordenador. 
Podemos habilitar la interrupcionn 
mediante la instruccion El (Enable In- 
terrupt )(hexadecimal FB * decimal 
251) o mhibirla mediante DI (Disable 
Interrupt )(hexadecimal F3, decimal 
243), 

Existen tres modos de funciona- 


miento con interrupciones enmascara- 
bles; 0* 1 y 2, El sistema operativo del 
Spectrum utiliza solo el Modo 1. 

AI conectar cl ordenador se arran- 
ca en Modo U (I MO), se ejecuta una 
rutina de inicializaeion situada en la 
ROM y a continuation pasa auioma- 
ticamente a! Modo 1 (IM ]) donde per- 
manece indefinidamente durante el 
funcionamiento estandar. 
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Programa **® 11 


til mode 1 os el habitual del Spec¬ 
trum y en el. cada vez que sc produce 
una interrucpion interna, siempre que 
esten hahilitadas las interruepiones 
(El). se ejecutan las rutinas do explo- 
radon del teclado (RST #38) v un in- 
ere men to de la base do tiempos. El rit- 
mo a que se producen interrupciones 
\lone tqado por un reloj interno que 
da im pul sos do sin cron izacidn cada 20 
mihsegimdos (50 ados par segundo.), 
1 unin cl teclado corno ol reloj do tiem- 
po real se dice quo ^estan controlados 
pur interrupciones^. 

Huiante la exploracidn del teclado. 
ta todu pulsada se almaccna en la va- 
i.ihle del siicma I AST KEY (pas. 
>Ni|) \ si 1 mcrementn en uno el va¬ 


lor de la variable del si sterna FRA¬ 
MES (pos. 23672 / 23673 y 23674). 

Durante la inhibicidn de interrup- 
ciones (DI) el teclado y el reloj de 
tiernpo real (no con fun dir con el «re¬ 
lop que proporciona los impulses de 
smcronizacion) estan bloqueados. O 
dicho de otra manera el teclado no 
funciona y el reloj atrasa. 

Existe una instruccion RETI para 
finalizar una interruption enmascara- 
ble retornando a la misrna situation 
inidal por lo que respecta al estado de 
interrupciones. Existe una equivalen- 
te (RETN) para el caso de interrup¬ 
ciones no-enmascarables. La instruc¬ 


tion RET re torn a de cualquier rutina 
de interrupdon (ISR), pero sin rnan- 
tener los valores actuales de estado de 
interrupciones. 

En el Spectrum se desactivan las in¬ 
terrupciones (DI) cuando se ejecutan 
cicrtos comandos. por ejemplo, BEEP 
x,y reactivandose (El) automatica- 
mente al finalizar. Situaciones analo- 
gas se producen durante el paso del 
eontenido del buffer de impresora a 
esta. durante PRINT o LPRINT etc. 

Si en un programa de eddigo maqub 
na no necesitamos actualizar el reloj 
de tiempo real ni utiiizar el teclado po- 
demos inhibir las interrupciones (DI) 
y el programa rodara mas deprisa. 

E! modo 2 no lo utiiiza el Spectrum 




























de forma estandar, pero es el mas po- 
tente y podemos aprovecharlo en 
nuestros programas en codigo maqui- 
na. 

Cuando esta activado el modo 2 
(IM2) y se produce una interrupcidru 
se suspende la actividad que se este 
ejecutando y el ordenador ejecuta la 
rutina cuya direccion (vector) es el va- 
lor reflejado por el contenido del re- 
gistro I (byte alto) y el bus de datos 
(byte bajo). Si no hay ningun perife- 
rico conectado, o lo hay pero no ha 
producido alguna interrupcidm tiene 
siempre el valor 255 (FF en hexadeci¬ 
mal) en el bus de datos. En cualquier 
otro caso aparecera el numero corres- 
pondiente a la interrupcidn producida. 

Vamos a aelarar ias cosas con un 
ejemplo. Supongamos que se ha pro¬ 
ducido una interrupcidn en Modo 2, 
que no existe ningun periferico conec- 
iado y que hemos almacenado en el 
registro I del Z80 el valor $7D (125 de¬ 
cimal)* El ordenador leera la direccion 
de 1SR (Interrupt Service Routine ), 
$7D(K) (32000 decimal). El vector de 
mterriipcion sera pues en este caso 
32000* En esta posicidn (y siguiente) 
habremos almacenado previamente la 
posicidn donde estara situada la ruti¬ 
na que queremos efectuar y desde la 
cual evidentemente podremos Hamar 
a otras de forma encadenada. 

La direccibn donde apunta el vec¬ 
tor de interrupciones evidentemente 
no puede ser cualquiera si queremos 
conseguir un resultado coherente. For 
ello el valor que dispogamos en el re¬ 
gistro I no puede estar entre $00 y $3F 
(ROM), $40 y $5C (memoria de pan- 
talla, buffer de impresora, variables 
del sistema, etc.), o cualquier otra 
parte ocupada por el BASIC, progra¬ 
mas en codigo maquina* etc. 

Como ejemplo practico de manejo 
de interrupciones analizaremos el si¬ 
guiente programa mediante el cual 
conseguiremos tener una musica de 
fondo, hagamos lo que hagamos* lo 
cual puede ser agradable mientras te- 
cleamos programas o los ejecutamos. 
Podemos componer la musica a nues- 
tro gusto y evidentemente no sera de 
gran calidad, ya que solo puede oirse 
«a golpe de interrupciones^ pero nos 


dara la sensacibn de que todo se pro¬ 
duce simultaneamente. 

En primer lugar comentaremos el 
programa en codigo maquina en sf y 
para ello nos valdremos del programa 
fuente el cual aparece a continuaddn, 
el cual tiene los siguientes modules: 

- puesta en marcha musica de fon- 
do (190-320) 

- parada musica de fondo (330-360) 

- ejecucion de notas musicales 
(370-700) 

- inicializadon (70-180) 

- archivo parametros (20-60) 

El rodaje del programa se comien- 
za con RANDOMIZE USR 64531 
(FC13 hexadecimal). Se almacenan las 
posiciones INTERR y 1NTERR+1 en 
las pos. etiqueta VECTOR y se carga 
el valor 251 en el registro I. A conti¬ 
nuation se fija el Modo 2 de interrup¬ 
ciones y se cargan las variables CAM¬ 
BIO y DURACION con los valores I 
y 0 respectivamente, retornandose al 
control del BASIC despues de habili- 
tar ias interrupciones. 

Tan pronto se produzca una inte- 
rrupcion se detendra la ejecucion del 
programa, tal v conio se indied ante- 
riormente ejecutandose la rutina fija- 
da por el vector 64511 en nuestro caso 
(FBFF* 251 ($FB) del valor de I y 255 
($FF) del valor del bus de datos al no 
haher conectado ningun periferico. Si 
hubiera alguno activado evidentemen¬ 
te la rutina no rodaria, pues el vector 
de interrupcidn VECTOR apuntaria a 
otra direccidn distinta a INTERR)* 
Desde esta rutina se llama a la 
ARRANQ para la ejecucion de una 
nota y luego a la rutina de la ROM 
RST0038h (JP 56 decimal) para la lec- 
tura del teciado y actualization del re- 
loj de tiempo real (FRAMES). Final- 
mente se retorna al BASIC en espera 
de otra interrupcion. 

No descenderemos al detalle pero 
indicamos que la ejecucion de la mu¬ 
sica se consigue basicamente haciendo 
uso de la rutina BEEPER de la ROM 
(CALL 949) y las cosas estan dispues- 
tas de forma que se detecta el final de 
los compases que estamos utilizando y 
se comienza de nuevo* a fin de que la 
fuente de la musica de fondo no tenga 
fin. El lugar donde tenemos compila- 
das nuestras notas se fija externamen- 


te mediante POKE a las posiciones de 
la etiqueta ORIG-D. 

Si la musica nos pone nerivosos y 
necesitanios concentration la cosa es 
faeil. Basta ejecutar RANDOMIZE 
USR 64561 y cesara* Con esta rutina 
hemos cambiado al Modo 1 en donde 
solo se ejecuta RST #38. 

Para mayor facilidad ofrecemos un 
programa en BASIC mediante el cual 
podemos escribir nuestra propia miisi- 
ca y comprobar en todo momento 
como suena y compilarla si nos gusta 
para poder rodarla como musica de 
fondo (compartiendo nuestros progra¬ 
mas BASIC, en fase de edition o eje- 
cucidn). Se incluye igualmente un car- 
gador de codigo maquina con los bytes 
correspondientes (DATA 4500) para 
aquellos que no dispongan de uno y 
tampoco deseen hacer ellos mismos la 
compilacidn (nosotros hemos utilizado 
el GENS3). 

Creemos que el programa esta sufi- 
cientemente documentado con los 
abundantes REM y no requiere nin- 
guna aclaracidn especial, 

Como medida precautoria recorda- 
mos la conveniencia de salvar el pro¬ 
gram a antes de adentrarnos en la 
aventura musical. Y una vez salvado, 
al ejecutarlo, hay que toner en cuenta 
que no se puede utilizar la opcidn C 
sin haber ejecutado antes ia B. 

1 REM ** MUSICA BAJO 

INTERRUPCIONES ** 

5 REM 


6 REM INTRODUZCA AQUI SU 
MEIQDIA EN PARAMETROS DE 
BEEP <T,F) 


7 

REM 




10 

DATA 

1,12,2,9,1,9,1 

,9 

/I/ 



,2,17,1,12,2,1 

2/ 

1/9, 


2/10/ 

1,10,2,10,1,12 

,5 

/14 

20 

DATA 

1,14,2,7,1,7,1 

,7 

,1,6 


,1,7, 

2,16,1,14,2,14 

/I 

,10, 


2,9/1 

,9,2,9,1,10,5, 

12 


30 

DATA 

1,12,2,9,1,9,1 

,9 

,1,8 


,1/9, 

2,17,1,12,2,12 

/I 

,12, 


2/11, 

1,19,2,19,1,19 

,5 

,19 

40 

DATA 

1,17,2,16,1,19 

/I 

,19 


,1,18 

,1,19,2,14,1,1 

9, 

1 ,19 


,1,18 

,1,19,2,12,1,1 

1/ 

2,12 


,1,11 

,3,12 



50 

DATA 

3,10,1,9,1,8,1 

,9 

,2, 
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program^ 



14,1 ,12,3.2,9,3.2,5,3.2,2 
,3.2,7,5,5 

60 DATA 1,5,1,7,1,9,1,10,2, 
16,1,14,3.2,12,3.2,17,3.2 
,16,3.2,14,5,12 
70 DATA 1,12,2,14,1,14,1,14, 
1,13,1,14,3,16,3,9 
80 DATA 2,17,1,17,1,19,1,17, 
1,19,5,21 

90 DATA 1,21,2,19,1,17,2,14, 
1,10,3.2,9,3.2,5,3.2,7,3. 
2,4,5,5 
96 REM 


98 REM INDICADOR FIN MUSICA 
(NO ELIMINAR) 

99 DATA 255,255 

1000 REM 

1001 REM MENU 

1002 REM 

1005 BORDER 0: PAPER 0: INK 
7: BRIGHT 1: CLS 
1010 PRINT AT 3,2; PAPER 2;" 
[28*espacioO" 

1020 PRINT AT 4,2; PAPER 2;" 
MUSICA BAJO 


INTERRUPCIONES " 

1030 PRINT AT 5,2; PAPER 2; 
C28*espacioO" 

1040 PRINT AT 6,2; PAPER 2; 
C6*espacioOINPUT 
SINCLAIRC7*espacioD" 
1050 PRINT AT 7,2; PAPER 2; 

C28*espaci oil" 

1060 PRINT AT 12,0;"A - 

ESCUCHAR LA MELODIA EN 
BASIC";AT 14,0;"B - 
COMPILA LAS NOTAS";AT 
16,0;"C - EJECUCION " 
"MUSICA DE FONDO*'"" 
1080 LET A$=INKEYS 
1090 IF A$="A" OR A$="A" 

THEN GO TO 3000 

O 

O 


ft 


tf 






















Program 0 ” 6 " 


1100 IF A$="8" OR A$="8" 
THEN GO TO 4000 
1200 IF AS^’C" OR A$= ,, C” 
THEN GO TO 6000 
1300 GO TO 1080 

3000 REM 

3001 REM VERIFICACION DE LA 
MUSICA 

3002 REM 

3005 RESTORE 10 
3010 READ D,F: IF D=255 AND 
F=255 THEN GO TO 1000 
3020 BEEP D/10,F-6: GO TO 
3010 

4000 REM 

4001 REM CARGA DE LA RUTINA 

4002 REM 

4005 RESTORE 4500 
4010 CLEAR 64504 
4015 PRINT AT 10,2; PAPER 1; 
INK 6; FLASH 1;"C0DIG0 
DE MAQUINA CARGANDOSE" 
4020 FOR N=64505 TO 64639 
4030 READ A; POKE N,A 
4050 NEXT N 

4500 DATA 128,252,0,0,0,0,0, 
0,221,229,229,197,213, 
245,195,54,252,241,209, 
193,225,221,225,195,56, 


0,33,1 ,252,34,255,251 , 
243,62,251,237,71,237, 

94.42.249.251.34.251, 
251,62,1,50,253,251,61, 
50,254,251,251,201,243, 
237,86,251,201,58,253, 
251,254,0,202,10,252,58 
,254,251,254,0,202,77, 
252,61,50,254,251,195, 
10,252,42,251,251,126, 
254,255,202,110,252,50 
,254,251,35,126,35,95, 
126,35,34,251,251,103, 
107,17,4,0,205,181,3, 
243,195,10,252,42,249, 

251.34.251 ,251 ,62,1 ,50, 

253.251.61.50.254.251, 

195.10.252 

5000 REM 

5001 REM COMPILACION DE LA 
MUSICA ELEGIDA 

5002 REM 

5005 RESTORE 10: CLS : LET 
0RIGD=6464Q 

5008 LET NOTA=0: LET D=ORIGD 
5010 READ DURACION,TONO 
5015 LET DURACION=INT 
{DURACI0N*6) 

5020 LET FRECUENCIA=<1.05946 


31 A T0N0)*256 

5030 LET PITIDO=INT (C437500 
/FRECUENCIA>-30.125> 
5035 IF DURACI0N=255*6 THEN 
POKE D,255: GO TO 5100 
5037 LET N0TA=N0TA+1: PRINT 
AT 10,10; "NOTA ";NOTA 
5040 POKE D,DURACI0N 
5060 POKE D+1,PITIDO-( INT 
C PITI DO/256>*256) 

5070 POKE D+2,INT (PITIDO/ 
256) 

5080 LET D=D+3 
5090 GO TO 5010 
5100 PAUSE 50: CLS : LET 
L0NG=(D+2)-ORIGD 
5110 PRINT AT 10,2; PAPER 1; 
" LAS NOTAS OCUPAN "; 
PAPER 2;LONG; PAPER 1; 

" BYTES" 

5120 PRINT AT 20,5; M PULSE 

UNA TECLA": PAUSE 0: GO 
TO 1000 

6000 REM 

6001 REM EJECUCION PROGRAMA 
INTERRUPCIONES 

6002 REM 

6005 RANDOMIZE USR 64531: GO 
TO 1000 



H20CODE tNPUT 


Todo se compra y se vende. Los antiguos zocos fueron 
tugares destinados a todo tipo de transacciones. INPUT 
tambien tiene el suyo. Vuestras operaciones de compra. 
cambio o venta seran pub/icadas en esta seccion, pero dos 
son las fimitaciones que imponemos: 

a) La propuesta tendra que ver con la microinformatica. 

b) Nos reservamos el derecho de no publicar aquef/os 
insertos de fos que se sospeche un trasfondo lucrat/vo. 

Ahora un ruego. Tratar de resumir al maximo el texto; 
escribir casi como un tefegrama siendo darns y concisos. 


Envia tu mensaje a: 


INPUT SINCLAIR-ZOCO 
cj Alberto Alcocer, 46 

28016 MADRID 
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EN riLMOAS ESPEPAUZAtJAS V GUANOES AIMACENES, 0 OIHECTAMENTE POR COHREO 0 TELEFONO A 


Vela?quef. 10 281101 Madrid Eels (91) 226 22 03/03 


SI 111 EGAS CON SPINDIZZY 
■PREMIO SEGURO! 


...SOLO CON ESCRIBJRNOS DICIENDO CUANTOS SEGUNDOS TE DESCUEN 
TAN CUANDO LA PEONZA CAE AL VACfO. 


Si la respuesta es correcta, recibiras gratis en tu domicilio el proximo 
numero de esta revista, y jademas! entre las ciert primeras cartas reci- 
bidas sorteamos jcinco magnificos compu-robot! Escribenos acompa- 
nando las instrucciones que te devolvemos con el premio. jQjo, que no 
valen las fotocopias! El concurso acaba el 30 de septiembre. Pon tu nom- 
bre y direccion y el nombre de la revista. 









































































Program 0810 " 


TODO SOBRE READ 
Y DATA 


■ 

COMO FUNCI0NAN READ Y DATA 

■ 

LA SENTENCIA RESTORE 

■ 

COMO C0NSTRUIR GRAFIC0S 

SENCILLOS A PARTIR 

■ 

DE LOS DATA 



Haciendo que el ordenador lea por 
medio de la sentencia READ un gran 
volumen de datos te pucdes ahorrar 
tener que teclear programas largos. 
Puedes usar esta misma tecnica para 
todo, desde graficos hasta indices sen- 
alios, 

Una de las caractensticas que hace 
que un ordenador sea tan versaiil es 
el use de variables. Y casi siempre la 
asignacion de valores a las variables es 
algo extremadamente sencillo, no tie- 
nes mas que escribir, por ejemplo, 
LET X = 5, Pero hay ocasiones en 
que la cantidad de informacion que se 
quiere utilizar es tan grande que llega 
a desbordarte. Aquf es donde encuen- 
tran su gran utilidad las sentencias 
DATA y $us acompanantes READ y 
RESTORE, Observa que estas sen¬ 
tences no estan disponibles cn el BA¬ 
SIC del ZX81. 

La palabra DATA tiene aquf un sig- 
nificado muy especifico, Se suele uti¬ 
lizer cl termino «datos» para designar 
una gran variedad de cosas, Por ejem¬ 
plo, un program a, una rutina en codi- 
go maquina y una matriz almacenada 
en cinta o en diskette , a todo esto se 
le suele llamar a veces «datos», Pero 
en todo este artfculo al hablar de da¬ 
tos, nos cstamos refiriendo a las sen¬ 
tencias DATA y a los elementos que 
conticnen. 

El primer metodo que se suele 
aprender para asignar valores a una 
variable, ya se irate dc una variable 
numerica o de una cadena de caracte- 
res, suele scr por medio dc una sen- 
tencia INPUT. Pero csta solo resulta 
de utilidad cuando es el propio usua- 
rio el que suniinistra la inform aridn a I 
ordenador cada vcz que sc cjccuta un 
programa. 

Muchas veces sin embargo, hay va¬ 
lores ftjos quo no tienen que ser intro- 
ducidos ni modificados por el opera- 
dor, por lo que se pueden incorporar 


permanentemente en el programa. 
Este es naturalmente el case tipico de 
aplicacidn de la sen tend a LET, Pero 
cuando el volumen de informadon es 
muy grande, el uso de grandes masas 
de sentencias LET es muy tedioso de 
programar y ademas la ejecucion del 
programa resulta bastante lenta. 

Aquf tienes un ejemplo en el que se 
podrfa utilizar una lista fija de enca- 
bezamientos en un programa para im- 
primir un nuevo documento: 

10 LET A$="DIA M 
20 LET B$= M $EMANA ,f 
30 LET C$- Pf JvlES fi 
40 LET D$="A#0 ,f 
50 PRINT AS^BS^CS 
,D$ 


Pero tambien podrfas utilizar sen¬ 
tencias DATA para conseguir el mis- 
mo resultado final: 

10 READ A$,B$ / C$ jF D$ 

20 PRINT A$.,B$,C$ 

,D$ 

100 DATA ,I DIA I, , I, SEMANA ,, / 

"MESV'AM" 

Si ahora resultara que quisieras uti¬ 
lizar no euatro, sino eincuenta encabe- 
zamientos diferentes, con el primer 
programa se requerinan 46 sentencias 
adidonales, mientras que con el se- 
gundo solo harfan falta una o dos mas, 
dependiendo del ordenador y del ta- 
mano de los encabezamientos, 
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COMO FUNCIONAN LAS 
SENTENCIAS «READ» Y «DATA» 


que una sentencia READ le ordene 
hacer lo contraries El siguiente pro- 
grama funcionaria perfectamente; 


^Como funcionan realmente las 
sentencias READ y DATA? Cuando 



el ordenador se encuentra con ana ins- 
truccion READ, explora todo el pro- 
grama hasta que encuentra la primera 
sentencia DATA. A continuacion 
asigna ei valor del primer dato de di- 
cha sentencia a la variable que figura 
en la sentencia READ, 

Asi', en el programa anterior la ca- 
dena de caracteres «DJA» queda asig- 
nada a la variable AS, a continuacion 
se asigna «SEMANA» a la variable 
B$, etc. 

Las sentencias DATA aparecen 
normalmente a! final de los program as 
para «no estorbar» mientras ef resto 
del programa se encuentra en fase de 
escritura y depuracion. Pero realmen¬ 
te pueden ir situadas en cualquier par¬ 
te, El ordenador simplemente ignora 
todas las sentencias DATA a menos 


10 DATA ALEMANIA 
20 READ A$,B$ 

30 DATA "FRANCJA'V'ITALIA 1 ', 
M ESPA#A ,f 
40 READ C$,D$ 

Sin embargo es evidente que el pro¬ 
grama resultara mucho mas facil de 
leer si todas las sentencias DA' r A se 
ponen agrupadas en alguna parte, 
Ademas hay una regia que hay que 
respetar siempre: Los datos de las sen¬ 
tencias DATA han de aparecer en el 
orden en que el ordenador deba leer- 
los, 

El mimero de elementos que puede 
contener una sola Hsta de datos depen- 
de de la maxima longitud de linea del 
ordenador. En cuanto una linea este 
llena se empieza una nueva; el orde¬ 
nador sigue tomandolas en orden, 


DfFERENTES TIPOS DE «DATA» 


Hasta ahora hemos estado hablan- 
do de sentencias DATA que conte- 
nian cadenas de caracteres, pero tam- 
bien pueden contener numeros. El 
Spectrum te permite ademas utilizar 
variables y funciones, por lo que pue- 
des perfectamente tener una linea 
como la siguiente: 

DATA ,r PARIS lf ,256 / a*5 

Las variables que aparezcan en la 
sentencia READ tienen que aparecer 
en el mismo orden que los elementos 
de la sentencia DATA. Por esta ra- 
zon, la Ifnea DATA anterior debera 
ser lefda con la siguiente sentencia: 

READ A$ V N,X 

Como puedes observar, la primera 
variable es una cadena de caracteres, 
lo que se corresponde con el primer 
dato que figura en la sentencia 
DATA, Sin embargo los dos datos si- 
guientes son variables miniericas, de- 
bido a que tienen que leer numeros. 


PROBLEMAS QUE PRESENTAN 
LAS LINEAS «DATA» 


Es facil cometer errorcs a I introdu- 
cir los datos de una sentencia DATA. 
Los principales problemas se presen- 
tan cuando no tienes suficientes ele¬ 
mentos, o cuando intentas que la sen¬ 
tencia READ lea datos de tipo equi- 
vocado. Si la sentencia DATA del 
ejemplo anterior hubiera sido teclea- 
da erroneamente de la forma DATA 
256.PARIS,a*5 te encontrarias con 
que la variable AS serfa *256\ Eviden- 
temente es un resultado erroneo que 
tu Spectrum se encargara de rechazar. 

Otro caso distinto se plantea cuan¬ 
do el ordenador intenta leer mediante 
la sentencia READ la variable 'PA¬ 
RIS*, asignandoselo a la variable N. 
Lo normal es que ocurran una o dos 
cosas. EI ordenador podrfa darse 
cuenta que el tipo de los datos esta 
equivocado, enviando un mensaje de 
error tal como «tvpe mismatch* o «mal 
los datos*. Pero tambien pudiera ocu- 
rrir que el ordenador suponga que 
PARIS es un nombre de variable con 
el que no se habia encontrado hasta 
ahora, con lo cual te contestant algo 
asi como ^variable no eneontrada* 

El otro error mas frecuente es su- 
ministrar datos de menos. Esto ocurre 
muchas veces cuando estas utilizando 
un bucle que contiene la sentencia 
READ, como ocurre en el programa 
que veremos a continuacion. En cuan¬ 
to haya un ligero error en el parame- 
tro del bucle, o se deje fuera acciden- 
talmente algun dato, el ordenador in- 
tentara leer mas alia del final de la lis- 
ta de datos. El resultado es que tu or¬ 
denador se detiene, enviandote un 
mensaje de error que dice «faltan da¬ 
tes* («Out of Data»), 


UNA LISTA SENCILLA 


Aquf tienes un programa que utili¬ 
ze un bucle para leer los dates con las 
sentencias READ y DATA. Es un 
programa muy sencillo de lista de te- 
lefonos. Tu introduces el nombre de 
la persona y el ordenador te presenta 
su mimero de telefono. 


INPUT S3 


















pro9 | ' tl,1iaC ^ 1 !! 



una coma, tienes que encerrarla cntre mediata dc hacerlo es porter en el pro- 


5 CLS 

10 PRINT AT 2,6;"DIRECTORIO 
TELEFONICG" 

20 INPUT"ESCRI8E EL NOMBRE"; 
R$ 

30 FOR J=1 TO 5 
40 READ NS / TS 

50 IF NS-R$ THEN PRINT AT 10 
,1"EL NUMERO DE ";NS;" ES 
;T$:ST0P 

60 IF N$="FIN" THEN PRINT AT 
1Q,3;R$;" NO ESTA EN LA 
LISTA" 

70 NEXT J 

500 DATA H PEPE'V f 425 12 34", 
"LUIS I V I 876 23 45", 
"ARTURO","567 34 56", 
"RAUL","784 34 12","FIN" 
,"FIN" 


Teclea el programa, pero ten la pre¬ 
caution de utilizar en la linea DATA 
los nombres y numeros de telefono de 
ms amigos, Puedes poner todos los da¬ 
tes que quieras. Lo unico que tienes 
que cuidar al final es de ajustar correc- 
tamente el contador de bucie de la li- 
nea 30. 

Observa que ia lista de datos se ter- 
mina con FIN,FIN. De esta forma la 
linea 60 puede comprohar si se ha al- 
canzado el final de la Imea. Si el pro- 
grama ha podido leer hasta aqui, sig¬ 
nifies que no ha encontrado el nom- 
bre, por lo que imprime un mensaje 
para decirtelo. Hay que introducir 
«r IN» dos veces, debido a que la li- 
nea 40 lee los datos de dos en dos, con 
lo que de no ser asi obtendras un men¬ 
saje de error de falta de datos. 

Fijate tambien en que para leer un 
numero de telefono se considers a este 
como una cadena de caracteres. Se ha 
hecho as! para respetar un signo de 
pimtuacidn, el guion, que evidente- 
mente no puede figurar como un nu¬ 
mero. Las cadenas de caracteres que 
figuren dentro de una sentencia 
DATA pueden contener espacios, 
pero no pueden contener comas. 
Como los diferentes datos estan sepa- 
rados por comas, el ordenador consi- 
deraria la coma como el final de uno 
de los daios. Si te vieras obligado a in¬ 
troduce en una sentencia DATA una 
cadena de caracteres que contenga 
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Camillas. Sena neeesario hacer esto en 
una sentencia DATA como la que fi- 
gura en el ejemplo siguiente: 

10 READ N$,A$,8$,C$ 

20 DATA "LUIS PELAEZ","C/ 
PINTO, 25","MURCIA" 


USO DE «RESTORE» 


Con los me todos que llevamos ex- 
plicados hasta este momento, un pro- 
grama es capaz de leer mediante una 
sentencia READ la correspondiente 
lista de datos de la sentencia DATA, 
pero solo lo hara una vez a men os que 
se vuelva a ejecutar de nuevo el pro- 
grama. Si quieres que se vuelvan a leer 
los dates, debes incorporar en tu pro- 
grama una sentencia RESTORE. 

Supongamos por ejemplo que quie¬ 
res mirar los numeros de telefono de 
algunos de tus amigos. La forma in- 


grama una rutina de «Otra Vez», Pan 
primero STOP en la line a 50 junto con 
GO TO 80, y a continuation aiiade las 
siguientes lineas de programa: 

80 PRINT AT 12,0;"QUIERES 
0TR0 NUMERO CS/N)?" 

90 PAUSE 0 

100 IF INKEY$="S"THEN GOTO 5 
110 IF INKEY$= f, N"THEN GOTO 
2000 

^Que sueede cuando intentas ejecu¬ 
tar el programa? La prsmera vez el 
programa funciona perfectamente. 
Pero cuando pulsas una tecla para in- 
tentar ejecutarlo por segunda vez, te 
falla porqtie le faitan datos. Elio se 
debe a que durante la primera ejecu- 
cion llego hasta el final de la lista de 
datos. Afortunadamente hay una so¬ 
lution muy sendlla para este proble- 
ma. Teclea: 





























15 RESTORE 

Esta vez el programs funciona bien 
todas las veces. Elio se debe a que la 
mstruccion RESTORE hace que el or- 
denador vuelva hasta el principio de la 
Hsta de datos. 

Es una buena idea poner RESTO¬ 
RE cerca del principio del programa 
durante la fase de desarrollo. Esto te 
evita tener que recorrer todas las lis- 
tas de datos en las pruebas de ejecu- 
cibn. Si crees que mas adelante te va 
a eonvenir suprimir dicha linea de 
RESTORE, pon una sentencia REM 
con un mensaje para que te lo recuer- 
de, 

For medio de RESTORE, puedes 
volver a utilizar una lista de datos tan- 
tas veces como sea necesario, Esto re- 
sulta particularmente util en progra- 
mas que tienen etiquetas, encabeza- 
mientos, tablas, etc, que seran repeti- 
das en mementos diferentes. For 
ejemplo, puedes poner los meses del 


prograntacion 


ano en una lista de datos dentro de 
una sentencia DATA en un programa 

de calendario del tipo que sea, el cual 
sin duda hara un repetido uso de di- 
chas tablas. 

La mstruccibn RESTORE es espe- 
eialmente iitil en los casos en los que 
deseas seguir leyendo con READ una 
Hsta para buscar un determinado ele- 
mento, como es el caso del programa 
de lista telefdnica que hemos visto an- 
teriormente. 


USO DE LA SENTENCIA «DATA» 


Las listas de datos que contienen las 
sentencias D ATA son extremadamen- 
te utiles en toda clase de programas, 
Puede que hay as hecho uso de ellas en 
los programas de graficos definidos 
por el usuario y en el dibujo del labe- 
rinto, Tambien hemos visto como pue¬ 
de leer el ordenador los parametros de 
la miisica y otros efectos sonoros, 

En los juegos de a venturas, se sue- 
le utilizar con freeuencia gran cantidad 
de Hneas de datos en las que se pone 
todo el texto necesario. Los juegos de 
marciamtos escritos en BASIC tam¬ 
bien usan con freeuencia las sentencias 
DATA para defrnir personajes y otros 
elementos del juego. 

Los program adores mas expertos 
utilizan las sentencias DATA para ha¬ 
ce r programas en cbdigo maquina o en 
lenguaje ensamblador. Tales progra¬ 
mas pueden consistir en un corto bu- 
cle que contiene comandos POKE los 
cuales leen (mediante READ) los da¬ 
tos de las sentencias DATA. 

En una palabra, todo programa que 
contenga texto ordinario, numeros o 
fun cion es, puede hacer uso con gran 
provecho de las listas de dates. Con 
un uso cuidadoso estas listas pueden 
convert!rse en una poderosa herra- 
mienta de programacibn. 


USO DE LOS PUNTEROS DE 
«RE3TORE» 


El linico problema que presentan 
las sentencias DA TA es que siempre 
hay que llamar a la informacion que 
contienen en la misma sucesion, em- 


pezando por la primera position. Con 
el uso de RESTORE siempre puedes 

volver al principio de la Hsta, incluso 
aunque todavfa no hayas llegado has¬ 
ta el final. ^Pero como podnas hacer 
para saltar al centro de una lista? 

El Spectrum te brinda una manera 
de hacer esto, En vez de utilizar uni- 
camente una lista, puedes usar real- 
mente varias, haciendo que el ordena¬ 
dor se dirija a la lista apropiada, En 
el programa de graficos que figura mas 
adelante, prueba a introducir las si- 
guientes hneas adicionales: 

6 INPUT "PUENTE VIEJO 0 

MODERNO 11 ; Y$ 

7 IF YS^V'THEN RESTORE 1000 

8 IF Y$= n M"TMEN RESTORE 2000 

9 IF Y$<> H V M AND Y$<> ,p M fr 

THEN GOTO 5 

2000 DATA 83,84,85,86,87,88, 
89,90,90,90,90,90,90,90 
,90,89,88,87,86,85,84, 
83 

2010 DATA 42,55,63,65,63,55, 
42 

Los numeros que figuran a conti¬ 
nuation de los comandos RESTORE 
se Haman punteros de RESTORE. Di- 
rigen al ordenador hacia una determi- 
nada lista de datos que empieza en el 
correspondiente numero de linea. Se- 
gun esto, si pulsas V para tener una 
casa vieja, el puntero de RESTORE 
toma el valor 1000. 

De hecho, cuando quieras que el or¬ 
denador se dirija al primer elemento 
dc la lista DATA, no hace falta utili¬ 
zar un puntero. Si se hace un RESTO¬ 
RE que no va acompahado por nin- 
gun numero de Imea, equivale a un 
RESTORE con el numero de la pri¬ 
mera Imea DATA. La linea 7 del an¬ 
terior programa del Spectrum podrfa 
haberse escrito igualmente como IF 
Y$=«V» THEN RESTORE, obte- 
niendo exactamente el mismo resulta- 
do. 

Los punteros de RESTORE son 
muy utiles en la programacibn de jue¬ 
gos. Por ejemplo en un juego de ate- 
rrizajes, podnas escribir un programa 
para comprobar si has aterrizado con 
suavidad o te has estrellado. Las listas 
de datos podrian contener en ese caso 


INPUT 55 



















SSSU1END0LE LA PISTA A 
ISIS DATOS 

Sea io que sea Io que conten- 
gan los dates de tus sentencias 
DATA, lodes ellos soelen tener 
una cosa en comun: se reqoiere 
bastante tiempo y trabajo para 
calcularlos y teclearlos. Esto se 
aplica principalmente a la pri- 
mera vez que trabajas con el 
programs, pero puede que tam- 
bien resulte necesario volver so- 
bre el mismo mucho mas adelan- 
te. 

Cuando las sentencias DATA 
se iisan para definir un bloque 
grafico o algo por el estilo, or¬ 
gan iza las Ifneas de! programa 
para que se correspondan direc- 
tamente con las filas del grafico. 
Si los datos siguen un formate 
que se repite (como en los mi- 
meros de una lista de telefonos, 
por ejemplo), organiza las lineas 
de programa con todas las entra- 
das de la misma forma. 


information para emitir el correspon- 
diente ruido de impacto o una fanfa- 
rria vietoriosa, v el puntero de RES¬ 
TORE apuntarfa en cada caso a la lis¬ 
ta corrects. 


USO DE LOS «DATA» EN LOS 
GRAFICOS 


Las sentencias DATA son muy uti- 
les en los programas de graficos para 
fijar las coordenadas que hay que di~ 
bujar y para llamar a las rutinas grafi- 
cas de la ROM. Ei use de los DATA 
de esta manera resulta ideal para las 
formas irregulares como las que figu- 
ran en la siguiente pagina, ya que se 
necesitarfan muchas lineas de progra¬ 
ma si solo se emplearan instrucciones 
individuates de impresion o dibujo, 

No obstante existen cases en que 
una sentencia DATA no es de gran 
utilidad. Asf ocurre cuando estas di- 
bujando formas muy regulares en las 
que las coordenadas o el con tor no gra¬ 
fico pueden calculate facilmente. 

Las sentencias DATA del programa 
que veremos a continuation, ban sido 
divididas deliheradamente en varies If- 


p^graitio^ 



neas, Se ha hecho ast porque la pos¬ 
terior modification de !os datos pue¬ 
de ser diffeii a menos que se tengan 
unas divisiones muy claras; imaginate 
Io que serfa volver sobre este progra¬ 
ma dentro de unos meses e intentar Io- 
calizar y modificar unos cuantos datos 
de cada una de las variables. Natural- 
mente. puedes seguir detenidamente 
la pista de cada una de las instruccio¬ 
nes READ, pero hacer esto en un pro¬ 
grama largo es muy tedioso. Por eilo 
te recomendamos que fragmentes 
cada grupo de sentencias DATA en 
varias Ifneas y que ademas (suponien- 
do que tengas memoria disponible) 
utilices abundantemente las sentencias 
REM para que las cosas te resulten 
mas claras. 

Ei siguiente programa utiliza 
READ y DATA para ayudarte a di- 
bujar un puente, Si introduces y eje- 
cutas e! programa por etapas. resulta- 
ra mas fatil comprerder lo que suce- 
de y comprobar que no te has equivo- 
cado al teclear. Empieza con lo si¬ 
guiente: 

10 FOR T=74 TO 80 STEP 3 
20 PLOT 35,T 
30 DRAW 175,0,-2.5 
40 NEXT T 

Esta seccidn utiliza un bucle FOR 
... NEXT que permite el dibujo de 
tres puntos prdximos al lado izquier- 
do de la pantalla y a continuation di¬ 
buja una linea curva a partir de cada 
uno de dichos puntos, En la linea 30, 
habras reconocido que 175,0 signifies 
«hasta un punto situado 175 pixels a la 
derecha del pixel de partida». El va¬ 
lor de —2.5 hace que dicha linea sea 
un arco de circunferencia en lugar de 
ser recta, 

100 FOR N=18 TO 39 
110 READ A 
120 PLOT N,45 
130 DRAW 0,A 
132 PLOT N+188,45 
134 DRAW 0,A 
140 NEXT N 

1000 DATA 70,70,67,67,70,70, 
60,60,57,57,60,60,57,57 
,60,60,70,70,67,67,70, 
70 


Esta seccion es la que dibuja las to- 
rres. El bucle situado entre las lineas 
100 y 140, mas el numero 45 (pixels 
contados a partir del fondo) de las !1- 
neas 120 y 132 dibuja los puntos de la 
base dc cada una de las lineas vertica- 
les muy proximas que forman las to- 
rres. 

Seguidamente entran en accidn las 
Ifneas 110 v 1000. La linea 110 dice al 
ordenador que lea en la linea 1000 la 
altura, expresada en pixels , de cada 
una de las 22 lineas verticales. Asi, la 
primera linea es 0,70 es decir. vertical 
y de una altura de 70 pixels ; la segun- 
da linea es 0,70. la tercera 0,67 y asi 
sucesivamente. Si quieres ver como va 
sucediendo esto, ensaya a insertar 
remporalmente una instruction como 
135 PAUSE 100 , 

300 PLOT 0,75 
310 DRAW 255,0,-0.1 
320 PLOT 0,78 
330 DRAW 255,0,-0.1 

Estas lineas son las que se ocupan 
de dtbujar la carretera; el —0,1 pro¬ 
duce una curva ligeramente convexa. 
Por ultimo: 

400 FOR R=62 TO 182 STEP 20 

410 PLOT R,78 

420 READ B 

430 DRAW 0,B 

440 NEXT R 

1010 DATA 42,55,63,65,63,55, 
42 

Estas lineas se encargan de dibujar 
los cables verticales que unen el arco 
con la carretera. El bucle FOR ... 
NEXT ayuda a dibujar las posiciones 
de partida de los cables, mientras que 
las lineas 420 y 1010 controlan su altu¬ 
ra. 

Si quieres que el programa vuelva a 
ejecutarse automaticameme, anadele 
las siguientes lineas: 

5 CLS:RESTORE 
450 GOTO 5 

La linea 5 borra la pantalla. permi- 
tiendo luego que el programa lea de 
nuevo los datos. 
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LOS MEJORES 
DE INPUT SINCLAIR 


PUESTO TITULO PORCENTAjE 

1° Commando .. / 7,7 

Z.° Rambo . 14,4 

3. ° Winter games .... 10,6 

4. ° Ping pong . 9,9 

5. ° Sky fox .. 9,8 

6° Green Beret .. 9,7 

7. ° Ole Toro ... 9,5 

8. ° Saboteur . 7,8 

9. ° Turbo esprit . ... 5,7 

10.° Sir Fred . 4,9 



100 % 


Para la confeccion de esta relacion unicamente se 
han tenido en cuenta las votaciones enviadas por 
nuestros lectores de acuerdo con la seccion «Los 
Me jo res de Inputs 

Septiembre de 1986. 




INPUT 57 
































EL ERIZO HAROLD 


Spiky Harold es un divertido 
programs que, desde el primer 
momento, nos ha causado una 
impresion muy favorable. 
Normalmente, en los juegos de su 
tipo los graficos y los protagonistas 
son de reducidas dimensiones con 
respecto a la pantalla, Ilegando en 
muchos casos a no superar los dos 
caracteres* Sin embargo, en este caso 
nos hemes encontrado con un 



DATOS GENERALES 

....a Ik 

TrTULO Spiky Harold 

FABRICANTE Firebird 
ORDENADOR Spectrum 43K 

TEMA DEL PROGRAMA 

Busqueda de provisiones 


(tti 



CALIFICACION (Sobre 10 ptos,;* 


DRIGIHAUDAD 

INTERES 

GRAFICOS 

COLOR 

SONIDO 


7 
6 

8 
7 
7 


TOTAL 



un inocente pollito, el erizo Harold 
cornienza de nuevo en el mismo 
lugar, hasta perder la ultima 
vida> El juego esta amenizado 
por una conocida melodia (El 
vuelo del moscardon), muy 
apropiada para poner a prueba 
vuestra paciencia, sobre todo cuandti 
no podais salir de alguna pantalla 
especialmente diftctl v comeneeis a 
perder los nervios (esperamos que 
eso no os ocurra), 

Para daros una idea clara del 
planteamiento del juego, os diremos 
que se parece un poco al 



voluminoso erizo a la busqueda de 
provisiones para hibernar, con un 
taniaho que, a pesar de ser 
considerable, no resta fluidez a sus 
movimientos. 

Por otra parte, la diversidad de los 
graficos, el color, y los 
desplazamientos de los obstaculos y 
enemigos que dificultan la tarea de 
Harold, tambien merecen un 
conientario muy positivo. 

El objeto del juego consiste en 
conseguir que su protagonista, sin 
mas ayuda que su habilidad para 
esquivar los muchos peligros a los 
que ha de enfrentarse, pues aquf no 


hay laser, ni bombas, ni nada 
parecido, recobre las fuerzas 
suficientes para enfrentarse a un 
largo invierno de letargo. Para ello, 
debera comer «todos» los alimentos 
que encuentre a su paso, y volver a 
su madriguera antes de que estalle la. 
prime ra torment a* 

El nivel de dificultad es muy alto, y 
en algunas pantallas solo se consigue 
salir con vidas despues de perderlas 
casi todas, que por cierto, al 
comenzar son nada menos que 
veinte. 

De spues de sufrir el roce mortal de 
alguna abeja, o una nube de gas, o 


Profanation, aunque el tema, como 
habreis podido comprobar, es 
completamente diferente. 

Spiky Harold es un programa 
estupendo que os recomendamos, En 
algunos de sus detalles se nota la 
mano de un programador que gusta 
de dejar su trabajo bien terminado. 
Por ejemplo, al realizar un salto, el 
erizo Harold cae «en suspensions, 
flexionando ligeramente las patas, y 
sus afiladas puas se mueven apenas 
perceptiblemente al andar* 

En resumen, un buen programa con 
el que estamos seguros de que 
pasareis muy buenos ratos. 


LAS TRES LUCES DE GLAURUNG 


wEn una oscura y silenciosa sala, 
perdida en algun lugar del vasto y 
tenebroso dominio del Sehor del 

Con un comienzo tan literario y 
sugerente como este, no cabe la 
rnenor duda de que el programa, a I 


menos, tiene un buen argumento, 
Afortunadamente. tambien es bueno 
todo !o demas, empezando por las 
mstrucciones, de las que hemos 
extraido un parrafo, y pasando por 
los graficos, el color y el 
movimiento. 


El objetivo del juego consiste en 
encontrar tres joy as y una Have, 
llegar hasta la salida y escapar. 
Naturalmente, existen multitud de 
enemigos dispuestos a impedirlo a 
toda costa, cada uno de ellos con 
caracteristicas diferentes. Para 
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derrotarlos, podras uiilizar algunos 
objetos que iras encontrando en tu 
camino, aunque tambien puedcs 
arriesgarte a un combate directo, que 
debe variar segun el tipo de enemigo 
al que te enfrentes.. 

El arma mas utili es la fiecha, pero 
de poco sirve contra Jos dos 
obstaculos mas poderosos del juego: 
el Mago y el Dragon. LLevando 
contigo alguna de las tres joyas. 
podras acabar facilmente con ellos. 
Tanto las joyas como el resto de Ids 
objetos, los e neon tiaras en el interior 
de los ha tiles que jalonan el camino. 



aunque deberas aetuar con cuidado, 
porque algunos de ellos contienen 
sorpresas muv desagradables. 


DATOS GENERALES 

VIIIIIlllAHIIftlkVIlHbiiiillllllitillilAIAAiAAlt 

TITULO Las tres luces de Glaurung 




FABRICANTE 


QRDENADOR Spectrum 48K 

TEMA DEL PROGRAMA 

Aventura en el castillo 







CALIFICACION (Sobre 10 ptos.) 


ORIGINAUDAD 7 

INTERES 7 

GRAFICOS 7 

COLOR 8 

SONIDO 5 


TOTAL 


34 




Las instrucciones son daras y bien 
estructuradas, y su redaction 
excelente (esperamos que cunda el 
ejemplo), 

En cuanto a los graficos y el color, 
tambien merecen una valoration 
positiva. con una mention especial 
para el profuso colorido de las 
pant alias. Aunque los fondos son 
negros, sin apenas decorado, cada 
personaje y cada objeto es de un 
color dife rente, con io cual la 
presentation grafica es mucho mas 
vistosa que en los programas 
monocromos* 





EQUINOX 

Equinox es una nueva production de 
Mikro-Gen en la que se abandona, 
no sabemos si definitivamente, el 

term dc las aventuras de WalJv, La 

* 

ullima vez que t it vim os oportunidad 
de ver a este sirnpatico personaje fue 
en Three Weeks in Paradise (Tres 
semanas en el par a iso), programa de 
aparicion relativamente reciente, on 
cl que tambien estaban Herbert 
( protagonista en solitario del Dummy 
Pun) y el resto de la familia. 

Pern en esta ocasion, para desilusidn 
de rod os, va no es el famoso Wally 
quicn p rot agon iza la aventura, si no 
una esfera-robot teledirigida. No 
obstante, podemos asegurar desde 
aqui que no hem os perdido nada en 
el cambio, pues estamos ante un 
programa excelente. Y es que a 
diferencia de otras casas de igual o 
mayor prestigio, Mikro-Gen sigue 
siendo sindnimo de trabajo bien 
hecho. 



Dicho esto. pasamos a hacer un 
breve resumen dc! argumento: El 
objetivo del juego consite en limpiar 
de residues radioactivos una serie de 
estancias, repartidas en varies 
niveles. habitadas por un sinnumero 
de extranos seres, Para finalizar con 
exito la mision contais con la ayuda 
de un potente laser, especialmente 
indicado contra los «bichitos» que 
trataran de dificultar el trabajo, y 
con sofisticados aparatos que os 
pennitiran neutralizer los residuos, 
pasar de un nivel a otro, y dar el uso 
correcto a cada uno de los objetos 


DATOS GENERALES 

... 

TITULO Equinox 

FABRICANTE Mikro-gen 
ORDENADOR Spectrum 48K 

TEMA DEL PROGRAMA 

Contamination Nuclear 



CALIFICACION (Sobre 10 ptos.) 


ORIGINAUDAD 7 

INTERES 9 

GRAFICOS 8 

COLOR 7 

SONIDO 8 

■ ■■■■■■lliAflllllllllllllAHIIIAIIIIIIIMI lltltti 

TOTAL 39 


que ireis encontrando. 

Aunque se trata de un programa 
muy original, no espereis algo 
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radicalmente distinto a las anteriores 
producciones do esta firma. Se ha 
seguide un esquema do 
programed on muy similar, con 
desarrrollo piano en dos 
dimensiones, y argumento hasado en 



ia utilizaddn en ei memento y lugar 
adeeuado, de una serie de objetos 
que se cogen* se usan y se dejan, 
como en el Herbert o el 
Pyjamarama 

Oueremos llamar vuestra atencion 
sobre la excelente calidad del sonido, 
especialmente en la 
presentacidn, Nada mas cargar el 
program a, y cad a vez que 
terminamos una partida, podemos 
escuchar una larga melodfa en la que 
no se repiten sucesivamente 
breves estribillos, como es habitual, 
si no que se reproduce 
nota por nota la partitura de un 
conocido tema. 

Los graficos son exeelentes, el grade 


de interes muy alto, y la 
origin alidad, con la salvedad que 
hemos hecho, tampoco deja mucho 
que desear. En definitiva, Equinox es 
un buen programa al que auguramos 
un gran exito. 





LA CIUDAD DE QUAZATRON 


Es tan diffctl encontrar una pequeria 
«obra maestra» entre la inmensa 
avalancha de soft de I os ultimos 
meses, que ahora que la hemos 
hallado no podemos dejar de 
sehalarlo, aun desoyendo la regia 
que dice que «los juicios de valor, se 
dejan para ei finals 


TE LO CONTAMOS 


Quazatron es un sofisttcado 
programa de Hewson de desarrollo 
tridimensional y cuidadisimos 
graficos, que tienen por protagonista 
al droide de Meknotech KLP-2, 
Klepto para los amigos, al que tu 
tendras que guiar en su denodada 
lucha contra los robots que habitan 
la ciudad suhterranea del planeta 
Quartech. 

Entre sus much as y sorpren dentes 
posibilidades, destaca una que es 
precisamente la que en mayor 
medida contribuye a dotar al 
programa de una especial 
origjnalidad: no solo podras acabar 
con los peligrosos robots enemigos 
por el tradicional (y hasta vulgar) 
sistema del laser, sino que tarnbien 
cs posible neutralizarlos desactivando 
sus eixeuitos. para despues quedarte 
con aqtieIIos componentes que te 


scan utiles para reparar los danos de 
tu KLP-2. Es deeir, que una vez 
derrotado el enemigo, se le puede 
«saquear», pero con cuidado, pues 
algunos de sus circuit os pueden 
haber quedado dan ados en el 
com bate. 

Los robots aparecen identificados 
por un nii me io del uno a I nueve. que 


DATOS GENERALES 

TITIILO Quazatron 


FABRICANTE Erbe 


ORDENADOR Spectrum 48K 


TEMA DEL PROGRAMA 

Aventura cibernetica 



CALI FICACION {Sobre 10 ptos.) 

ORIGINAUDAD 

9 

INTERES 

9 

GRAFICOS 

9 

COLOR 

6 

SON IDO 

7 

TOTAL 

40 


nos indica el grade de peligrosidad y 
sofisticacidn de cada uno de ellos. 
Los mas diffeiles de veneer son ios 
que tucen un bien visible ntimero 
uno, y los mas inutiles los que I leva n 
un nueve. 

La ciudad en la que transcurre la 
aecion se divide en varies niveles, 
accesibles por unos ascensores que 



los com unican entre si. En algunos 
puntos encontrareis terminales de 
ordenador que os permitiran utilizar 
una serie de valiosas intormadoncs 
sobre lo que interesa conocer para 
lograr el objetivo, como pianos 
tridimensionales, perfiles de los 
diversos niveles, y una completa 
biblioteca de datos sobre los 
componentes clectronicos de los 
robots enemigos. 
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Como en todo juego de accidn que 
se precie. el nivel de energfa juega 
un papel muv importante, auqnue en 
este caso se le ha dado un 
tratamiento muy original. El rostro 
de KLP-2 indica en todo momemo. 
segun su gesto. si le falta o no 
energfa. Cuando tenga suficiente, 
lucira una amplia sonrisa, y a medida 
que vayan agorandose las reservas se 
tomara en un scvero gesto de 
enfado. 


LO BUENO Y LO MALO 


Como rasgos mas novedosos de este 
sensacional programa, sehalaremos 
su originalfsimo planteamiento 
tridimensional, y su bien logrado 
efecto de scroll , que dan a la imagen 
una sorprendente sensacion de 
realismo. 

El tratamiento de la tercera 
dimension en el soft para ^micros. 


por lo que al Spectrum se re fie re. ha 
pasado hasta ahora por tres etapas: 
la «prehistoria», con timidos intentos 
en los decorados de los fondos; la 
«revolucion» que supuso el Knight 
Lore, con su efecto Filmadon ; la 
aplicacion del scroll al escenario de 
tres dimensiones eon el 
Higway-Encounter: y abriendo una 
nueva etapa, el Quazatron. eon una 
original interpretacidn del espacio y 
el movimiento. 

Poco, por no decir nada, es lo que 
tiene de malo este programa, La 
practiea nos esta demostrando todos 
los dfas que no existe el programa 
perfecto. pero a veces. program as 
como este nos hacen pensar lo 
contrario. 


RESUMIENDO^ 


Exeelente programa. 

Desde hace mucho tiernpo se vjene 


diciendo que los escasos 48K del 
Spectrum «no dan para mas». pero 
parece ser que hay programas que 
saben hacer milagros, 

En definitiva, se trata de una 
interesante aventura en la que 



ademas de accion, hay estrategia. No 
es uno de esos juegos en los que nos 
matan en cuanto nos descuidamos, v 
en ios que no podemos paramos a 
pensar. Accion no falta. pero 
tampoco sobra. 


★★★★★★★★★★★★★★★★★★★★★★★★★★ 

LA CIUDAD PERDIDA DE SINU 


Tres intrepldos exploradores y su fiel 
amigo Frozbie se encuentran en las 
selvas de America del Sur donde 
intentaran encontrar los resto de una 
antigua civilizacion. 

Cada uno de ellos tiene unas 
caracteristicas que en un 
determinado memento pueden 
fadlitar la labor. Asf mientras el 
periodista O s Donell es bastante 
patoso pero es el mas fuerte T el 
profesor utiliza los objetos hallados 
en las tumbas, al perro le gusta 
rascar en la tierra y la bella Daphne 
tiene una especial habilidad para 
encontrar objetos. 

Al inicio de la partida se selecciona 
el personaje que se desea siendo 
posible cambiarle durante el 
desarrollo del juego en fucion, las 
necesidades. 

La aventura comienza a las puertas 
de la ciudad donde un guardian sin 
cabeza difieulta el acceso a la misma, 
Una vez dentro apareceran las 
distintas criaturas que intentaran 
matar a los protagonistas. 


logicamente estos cuentan con unas 
energias limitadas, Una vez rmierto, 
si alguno de los compaheros que 


DATOS GENERALES 

TITULO Pyracurse 
FABRIGANTE Hewson 
ORDENADOR Spectrum 48K 

TENIA DEL PROGRAMA 

Civilization perdida 



CALIFICACION (Sabre 10 ptos.) 


**»«*»'» IIIIIDIIIII II (111 I1J1 

ORIGINALIDAD 6 

JNTERES 6 

GRAFIGOS 7 

COLOR 5 

S0NID0 8 
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TOTAL 32 




continuan con vida consigue 
descubrir el brebaje de la 
inmortalidad podra resucitarla. y por 
tanto seguir adelante con la 
exploration, acudiendo al lugar 
donde sucumbid. 

Se trata de un juego tridimensional 
en el que los perosnajes se mueven 
en las cuatro direcciones, pudiendo 
tomar y dejar objetos, asf como 
grabar e! juego y continuarlo 
despues. 

En pantalla, ademas del desarrollo 
del juego, aparece en la esquina 
superior izquierda la energfa del 
personaje. en la inferior izquierda el 
dios del pueblo Sinu Xipe Totac, a 
continuacion una ventana con el 
menu eorrespondiente y el 
procentaje del recorrido, mientras 
alrededor de la pantalla figuran 
diversos objetos de la cultura Sinu. 
Cada personaje puede transportar 
tres objetos simultaneamentc aunque 
no todos los personajes pueden coger 
todos los objetos. 

Tambien existe la posibilidad de 


INPUT 61 

































Hevar conjuntamente a otros 
personajes por si son necesarios en 
una misma habitation o zona, pero 


ello implica un mayor riesgo ya que 
pueden set atacados mas 
facilmente. 


En resumen, un entretenido juego de 
Hewson con agradable musica y 
buenos graficos y color. 




MISION EN EL PLANETA ZY80R 


Con tu codiciada «Licencia de 
combate» de ia Federation Planetaria 
en el holsillo, partes hacia el planeta 
Zybor en tu primera mision 
ofieial. Precisamente, la misma 
mist6n en la que perecieron tus 
predecesores. 

Zybor no es una simple guarida de 
piratas estelares, conio tantas hay y 
tantas destruye la Federation, sino 



un mundo habitado por una raza 
superior de humanoides, cuya unica 
misidn es proteger a toda costa a los 
cuatro criminales mas peligrosos de 
toda la galaxia. Elios son nada 
menos que Xtro II, Ariel Head, Max 
Porka y Yokohama, Todos los que 
intentaron acabar con alguno de 
ellos, murieron sin remision, Pues 
bien, a ti corresponde intentarlo una 
vez mas, solo que no bastara con 
matar a uno, sino que tendras que 



DATOS GENERALES 

IVlllillltlltlllflRfllRIIIRIHIRIIVMIM 

TITULO Mantronix 
FABRICANTE Probe Software 
ORDENADOR Spectrum 48K 

TEMA DEL PROGRAMA 

Aventura Espacial 





CALI FI C AC ION (Sobre 10 ptos.) 


ORIGINAUDAD 

IHTERES 

GRAFICOS 

COLOR 

S0NI00 

TOTAL 


8 

6 

7 

4 

4 




29 




mandar a peor vida a los cuatro, 

El escenario en el que transcurre ia 
aceion es tridimensional, con 
proyeccion isometrics. y nos 
recuerda un poco al Quazatron. 
aunque no liega a la calidad grafica 
de ese magm'fico programa, 

Existen once tipos distintos de 
objetos: cuatro de ellos son 
humanoides asesinos. y el resto 
pulsadores (que son la principal 
fuente de energfa vital de los cuatro 


criminales), cubos de fuerza. y 
objetos de diversos usos, como 
joyas, dinero, maquinaria. etc. 

El grado de interes, la calidad de los 
graficos y el movimiento, estan a un 
nivei medio-alto con relacion a los 
programas de su tipo, y en general 
solo hemos encontrado un par de 
aspect os negatives: el sonido. muy 
pobre; y el scroll, algo tosco. Por lo 
demas. podemos decir que se trata 
de un buen programa. 


62 INPUT 










































LA CALABAZA CONTRAATACA 


De$pu£s del exito del Cauldron I, 
Palace Software acaba de lanzar una 
segunda parte que no tiene nada que 
envidiar a la primera* 

En esta ocasidn si que podemos 
hablar de una verdadera 
«continuaci6n» y no de una 
«repeticion»* Tanto los graficos como 
el planteainiento del juego, han sido 
renovados hasta el pun to de que si 
hubiera sido presentado el programa 
eon otro nombre. dificilmente podrfa 
encontrarse su reladon con el 
Cauldron L El unico punto que pone 
ambus partes en contacto es el tema: 
tambien va esta vez de brujas, magia 


, escobas y calabazas, aunque con un 
tratamiento diferente. En fin, que si 
has jugado con la primera parte, 
puedes comprar sin miedo la segunda 
(v si no has jugado, naturalmeme, 
tambien). Por una vez, no se ha 
puesto en practica el feo sistema del 
«autoplagio», que algunos califiean 
de «estafa»* 

Los cambios introducidos, a parte de 
una completa renovacion del 
repertorio grafico, son los siguientes; 
La bruja, que en la primera parte 
hacfa las veces de protagonista, 
ahora es la ^mala» v tiene un papel 
secundario. La heroma es esta vez 


una calabaza, que a falta de 
extremidades debe desplazarse a 
saltos, calculando el impulse y la 
distancia necesarios para llegar hasta 
donde quiere (al principle, cuesta 
acostumbrarse). En lugar de los 
amplios «exteriores» del anterior 
escenario, tenemos un tenebroso 
castillo-laberinto, con salones, cuevas 
v mazmorras* En cuanto ai objetivo 
del juego, los cambios han sido 
pocos: una vez mas, se trata de 
reunir los ingredientes de una 
formula, con la ayuda de las rim as 
que van dando «pistas» sobre la que 
se debe hacer para lograrlo. 





DATOS GENE RALES 


TITULO Cauldron II 



FABRICANTE Palace Software 



ORDENADOR Spectrum 48K 

TEMA DEL PROGRAMA 

Magia y Hechtzos 






CALI FICACIO N (Sabre 10 ptosj 


ORlGlNALIDAO 

7 


INTERES 

8 


GRAFICOS 

8 


COLOR 

8 

SONIDO 

7 

TOTAL 

38 











LAS ANDANZAS 
DE UN ANDROIDE 


Un planeta acaba de emerger de un 
agujero negro y si su nucleo no es 
reconstruido rapidamente explotara, 
lo que impiica la destruction de todo 


el universe, 

En una lejana galaxia un androide 
que ha sido programado durante 
varios anos, esta preparado para 


comenzar su peligrosa mision, 

El juego se inicia en la parte mas 
aita de un complicado laberinto que 
encierra un sin fin de sorpresas. 
Existe un numero indeterminado de 
seres que tratan por todos los medios 
de restarle energies, para !o cual le 
buscan incansablemente ya que con 
su simple roce le causan serios 
danos. 


INPUT 63 

































Para llevar a eabo la mision el 
andoride puede moverse a izquierda 
y derecha. ademas de ascender y 
disparar, aunque estas dos opdones 
estan limitadas, per lo que es 
necesario saber dosificarlas. 

A lo largo del recorrido existe una 


serie de plataformas que contienen 
una pequeria nave, la cual permite el 
transpose en todas las direcciones y 
per supuesto con una gran rapidez. 
El ilnico inconveniente es que 
mientras el androide utiliza la 
plataforma volante, no puede 


recoger ninguno de los objetos que 
surgen en su camino, per lo que es 
necesario dejar la nave y continuar a 
pie, para conseguirlos. 

La parte superior de la pan ta I la 
muestra, ademas de la puntuacion, e! 
numero de vidas que restan y el 


DATOS GENERALES 


HTULO Starquake 

FABRIC ANTE Bubble Bus 


ORDENADOR Spectrum 48K 


TEMA DEL PROGRAMA 

Laberinto espacial 







CA LI FI C AC ION (Sobre 10 ptos.) 


0 RI GIN ALIDAD 7 

INTERES 7 

GRAFICOS 8 

COLOR 8 

SONIDO 8 


TOTAL 





estado actual de las energias, el rayo 
laser y el elevador. 

A pesar de que los niveles 
disminuyan, en el laberinto existen 
bastantes objetos que pemiten 
renovar esos niveles para continuar 
la aventura, 

Un juego lleno de colorido y accidn 
creado per Bubbles Bus que cuenta 
ademas con una entretenida banda 
sonora. 




MAESTRO DE KUNG-FU 


La firm a Ocean red hi 6 el encargo, 
por parte de L ,S, Gold, de hacer una 
adaptacidn para Spectrum del 
famoso programa Kung-Fu Master, 
con el que tantas veces hemos 
jugado en las maquinas tragaperras. 
Pues bien, el resultado no ha podido 
ser mejor. 



Una vez mas. el hecho de que el 
hardware del Spectrum carezca de 
sprites se ha dejado sentir, Esto, 
unido a la imposibilidad de dar color 
en «alta resolucion», ha determinado 
que los graficos se quedaran a «arios 
luz» de la version original: las figuras 
son monocromas, y sus colores se 
mezclan al superponerse. 

No obstante, el repertorio de golpes, 
fintas v movimientos, la variedad de 
los personajes, la emocibn y el 
in teres, se han conservado intactos. 
Tambien se ha sacado el maximo 
partido a las pobres posibilidades 
sonoras del Spectrum, incorporando 
una musiea de «suspense» muy 
apropiada para el tema. 

Seguro que ya conoceis el 
argumento, pero por si no es asu os 


DATOS GENERALES 
TTTULO Kung-Fu Master 
FABRICANTE U S. Gold 


ORDENADOR Spectrum 48K 

TEMA DEL PROGRAMA 

Artes Marciales 



CALIFICACION (Sobre 10 ptos.) 
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ORIGINAUDAD 7 

INTERES 9 

GRAFICOS 7 

COLOR 6 

SONIDO 8 

... ... 

TOTAL 37 


€4 INPUT 



































































1 o resumimos: 

Tu, el heroe* debes rescatar a la 
joven cautiva en el quinto piso de la 
guarida del Mago, En cada niveL 
de betas derrotar a tus enemigos v 
llegar a las escaleras del nivel 
siguiente, antes de que se te acahen 
las fuerzas o se agote tu tiempo. En 
el transcurso de la aventura, te 
enfrentaras a dragones, serpientes. 
siearios, globos misticos. avispas, 
gnomes, guardianes y guerrilleros. 
Una posibilidad interesante que 
incorpora el juego es la de poder 
elegir el nivel en el que queremos 
comenzar a jugar. A1 principle, 
parece que esto se refiere al «nivel 
de dificultad^, pero en realidad se 
trata de Jos ptsos de la guarida. Es 


decin eligiendo el nivel cineo, 
comenzamos en el quinto piso. 

Las instrucdones (al menos en el 
ejemplar que hemos probado), estan 
en castellano. Son bastante 
completas e induyen graficos que 
ilustran los diversos movimientos que 



puede realizar el heroe. 

En la caratula se advierte que es 
necesario usar joystick y y ademas en 
plural (literalmente: joysticks 
necesarios»), No sabemos si se trata 
de un error de traduccion, o se 
refiere a ias versiones para otros 
modelos de ordenador, pero la 
verdad es que no se puede conectar 
dos joysticks simultineamente, ni 
tampoco es necesario poseer uno 
para poder jugar (tambien se puede 
manejar e! programa desde el 
teclado). 

Para terminar, tenemos que decir 
que Kung-Fu Master es un excelente 
programa de artes marciales, que 
podemos incluir entre los mejores de 
su genero. 


★ ★★★★★★★ 


VECTRON 

Te encuentras en el interior de un 
intrincado laberinto en una 
dimension desconocida. Viajando a 
velocidad vertiginosa. debes 
destruir todas las maquinas asesinas 
que en el habitan y encontrar 
despues una salida para escapar. 
Dispones de un detallado mapa 
que podras consultar en cualquier 
momenta, aunque sin detenerte, 
en el que aparecen las posiciones que 
ocupan tus enemigos y ta tuya 
propia, Cada color, corresponde a un 
tipo distinto de maquina. 

Veetron es una version mejorada del 
tradicional laberinto «de aristas», 
definido por una serie de lineas que 
form an pianos sin rellenar de 
color. 

La principal innovacion 


introducida es la posibilidad de 
superponer un mapa transparente 
sabre la pantalla, que permite ver 
lo que esta ocurriendo y a la vez ser 
consultado. 

El nivel de dificultad es alto, y no 
extste man era aleuna de reducir ia 

w 

velocidad del juego, El punto de 
mira, que se emplea tanto para 
disparar como para hacer los giros, 
se rnueve tambien con excesiva 




rapidez, y basta un ligero toque a la 
tecla correspondiente para que se 
vaya de un lado a otro de la 
pantalla. Al principle, cuesta un 
poco acostumbrarse. 

La velocidad con la que ocurre todo 
en el juego, es un elemento muy 
positive desde el punto de vista 
tecnico, y el hecho de que 
incremente mucho el nivel de 
dificultad tampoco es algo 


negative, pero un programa 
incomodo de manejar nimea es 
deseable. 

No podemos decir que no sea un 
buen programa, pero la verdad es 
que tampoco tiene muchos aspectos 
positivos que resenar. 

Naturalmente* seguro que a los 
amantes de este tipo de juegos, 
les va a guslar. 


DATOS GENERALES 

. ... ■ 

TTTULO Veetron 
FABRICATE Firebird 
ORDENADOR Spectrum 48 K 

TEMA DEL PROGRAMA 

Laberinto 



CALIFICACION (Sob re 10 ptasj 


ORIGINALIDAD 6 

INTERES 6 

GRAFICOS 5 

COLOR 4 

S0N1D0 4 

. .. till 

TOTAL 25 
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Desearia entrar en contacto con usua- 
rios del Spectrum Plus, para intercam- 
bios de ideas, trucos e information* 
Tambien vendo las cintas: Chess, Re- 
versi, Backgammon, De Psion. Interesa- 
dos escribir a: 

German Crespo 
Buril, 159 
Tel, (954) 52 42 36 
41006 Sevilla 


Vendo cintas y revistas Microhobby 
Cassette, Microhobby Semanal y Video 
Basic muy baratas. Me gustaria tam¬ 
bien cambiar ideas y juegos con usua- 
rios del Spectrum en Andalucia. 

Carlos Ramirez Perez 
Placets def Comino, 7 
Tel, (95S) 22 72 91 
18010 Granada 


Vendo consola de juegos Atari con cua- 
tro mandos (dos joysticks y dos padd¬ 
les), cuatro iuegos muy buenos, todos 
los cables e instrucciones de uso por 
25.000 ptas., todo en muy buen estado 
y funcionando, tambien lo cambiana 
por Spectrum. Preferentemente com- 
pradores de la provincia. Llamar a: 

Juan 
Tel. 437 04 68 
Barcelona 


Vendo ZX Spectrum 48K RAM, nuevo, 
junto con afimentador de 9 V., cables 
de conexlon, manuales, tanto en ingles 
como en espanol, cintas de juegos y de 
apficaciones practicas, con o sin graba- 
dora, por la cantidad de 28.000 ptas. 
(negociabies)* 

Juan 

Tel. (981) 25 98 95 
La Coruna 


Urge* Vendo ZX Spectrum 48K, cables 
y todo, manual en casteliano mas joys¬ 
tick-interface junto con buenos juegos 
y utilidades, por 25.000 ptas, Discuti- 
bles. fnteresados llamar a: 


£120C 



Jose o Manolo 
Tel. (91) 675 16 80 


Brisco programa de base de datos, Jo 
cambio o lo compro, Cambio progra- 
mas para ZX Spectrum, fnteresados di- 
rigirse a: 

Jose Hernandez 
Pompeo Fabra, 1 
Igualada (Barcelona) 


Urge comprar Commodore 64 en bue- 
nas condiciones por un maxima de 
25.000 ptas, sin datacassette, Tambien 
vendo ordenador SVE-328 + Shot II + 
programas + documentacion.Todo por 
40.000 ptas, 

Julio Molina Robledo 
Constitucion, 11, 7 A 
Tel. (911) 22 34 55 
19003 Guadalajara 


Vendo Commodore Plus/4 a estrenar, 
con transformation cables de conexidn 
y dos manuales: uno del Basic 3.5 y 
otro de 4 programas (Procesador de 
texto, Base de datos r Graficos y Hoja de 
Trabajo) que vienen con el ordenador. 
Todo por 41*000 ptas, discutibles. 

Juan Carlos Martinez 
Larrunarri, 5, 3"B 
TeL (943) 52 20 40 (noches) 
Renteria (Guipuzcoa) 


Vendo copiador ingles turbo, aita velo- 
cidad, con o sin cabecera y programas 
de un solo bloque por mil quinientas 
pesetas. Llamar a: 

TeL (94) 415 91 97 (a partir de Jas seis) 

De I ones a jueves 


Desearia intercambiar programas de 
Softwarek, ideas, etc. con usuarios de 
Spectrum 48K, 

Jordi Fames Vlves 
San Jose, 106, 1° 
TeL (93) 803 08 59 
Igualada (Barcelona) 


Vendo Spectrum ZX 1SK en buen esta¬ 
do. Lo dejare barato. Ademas regalo 
cinco cintas con programas. Vendo 
tambien cinco libros para el Spectrum. 
Interesados dirigrrse a: 

Jesus Maria Garrues Alonso 
Esteban Armendariz, 7 
Villava (Navarra) 


Urge por servicio militar* Vendo ZX 
Spectrum Plus (menos de dos meses) 
con instrucciones (ingles y casteliano), 
cinta Horizonte, transformador y acce- 
sorios. Todo por 30.000 ptas. (no nego- 
ciables). Incluye grabadora, 

Javier 

TeL (91) 633 09 37 
Madrid 


Compro interface 1 + 10 incluso 2 mi¬ 
crodrives. Llamar a: 

Inigo Losa 
Tel, (943) 39 48 71 


Me gustaria contactar con usuarios de 
Spectrum para intercambio de ideas y 
gpiniones en torno a) Spectrum. Soy 
prinefpiante. 

Alberto Echevarria Cafiejo 
Helguera de Reocin, 85 
TeL (942) 82 03 72 
Cantabria 


intercambio programas para Spectrum 
48K, con gente de Gijon* Poseo juegos, 
ultimas novedades, como son el Sir 
Fred, Dam Busters, Winter Games, Evil 
Crown, Beach Head II, Comando, Bas¬ 
ketball International, Gyroscope, Glass, 
Bounty Bob, etc, 

Julio Cesar Villa 
FefiHdad 4 A*A 

TeL 39 84 76 (llamar de 14,30 a 15,30 

y de 18,15 a 21,30) 
Gijon (Asturias) 


Cambio libro «ZX Spectrum, que es, pa¬ 
ra que sirve y como se usa» de Tim 
Langdell, por juegos preferentemente 
de guerra. 

Juan J. Albiac 
Hernandez Pacheco, 1, 1°H 

10002 Caceres 


Vendo ZX Spectrum con: Televisor de 
14 pulgadas Grundig con cassette y ra¬ 
dio incorporadas* (B/N), Tedado profe- 
sional Lo-Profile (importacion), interfa¬ 
ce Joystick tipo Kempston y Joystick 
Quick Shot 2, Curso de Basic con 20 
cassettes y 20 libritos (Video Basic), 65 
revistas Microhobby, 6 revistas Input 
Sinclair, 2 libros de programadon en 
Basic, y mas de 60 juegos comerciales 
(buenos). Todo con menos de un aho 
de uso. Precio 80*000 ptas. Preguntar 
por: 

Miguel 

TeL 350 53 36 (llamar preferentemente 

de 14 a 15 h.) 

Barcelona 


Desearia intercambiar ideas, progra¬ 
mas, etc., con usuarios del Spectrum. 
Responder© a todas las cartas. 

Javier Zubeldia 
Avda. de Madrid, 7, 8"A 
San Sebastian (Guipuzcoa) 


Compro Interface para Micro-drive y/o 
Microdrive que esten en buenas condi¬ 
ciones y a precio asequible. 

David Mark Baber 
Venus, 9, 8"C 
TeL (91)619 56 16 
S.J. de Valderas (Madrid) 


66 INPUT 







































solo los mejores so 


Amstrad Spectrum Amstrad D 


Spectrum 

Amstrad 

Amstrad 
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Commodore 
Amstrad 
Amstrad Disk 
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m ri 11 i n h i ™ 111 


^arenwHMgeK SEIKOSHAEd M-TRONIC 


LO HUBIERA PODIDO 


COMPRAR MAS 


ventas al mayor 


Los clientes de Regisa esta pregunta ya no se 
la hacen. Pero ademas cuando conozcan las 
nuevas ofertas de monitores, ordenadores, 
impresoras, unidades de disco, perifericos, 
software, etc. (evidentemente todo con 
garantia), que ha preparado Regisa, se van a 
llevar una agradable sorpresa. 


Comercio, 11 - Tel. 319 93 08 - Barcelona 

lo mismo y mas..., pero al mejor precio 


Estahlecimientos recomendados: * BAZAR DELHI. Reina Cristina, 11. Barcelona • INTERJOYA. Reina Cristina, 9* Barcelona • 
BAZAR TAIWAN. Plaza Palacio, 19 (Galenas). Barcelona • LOS GUERRILLEROS, I. Canarias, 128. Valencia * BAZAR KARDIS. I. 
Canarias, 130. Valencia • BAZAR DELHI. M. Ruano. 5* Lieida 
















































